RDOQuickStepActions object

 

RDOQuickStepActions collection represents actions performed by a quick step (RDOQuickStep).

 

Returned by:

RDOQuickStep.Actions

 

The example below loops through all quick steps and for each quick step prints out each action in the XML format.

set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
set QuickSteps = Session.Stores.DefaultStore.QuickSteps
for each QuickStep in QuickSteps
    Debug.Print "----------------"
    Debug.Print QuickStep.Name + " - " + QuickStep.Tooltip
    for each Action in QuickStep.Actions
        Debug.Print " " + Action.AsXML
    next
next

 

Properties

Methods

 

Derived from: IDispatch

Properties
Count Integer, read-only.
Returns the number of actions of the quick  step		  

Methods
Add(ActionKind) Adds the action of the specified kind.
Returns RDOQuickStepAction or on object derived from RDOQuickStepAction (such as RDOQuickStepActionMoveToFolder etc) depending on the specified kind.

ActionKind: one of the rdoQuickStepActionKind enums.

qakNoAction = 0x00000000
qakMoveToFolder = 0x00000001
qakCopyToFolder = 0x00000002
qakDeleteMessage = 0x00000003
qakPermanentlyDeleteMessage = 0x00000004
qakMarkAsRead = 0x00000005
qakMarkAsUnread = 0x00000006
qakSetImportance = 0x00000007
qakCategorizeMessage = 0x00000008
qakClearCategories = 0x00000009
qakFlagMessage = 0x0000000A
qakClearFlag = 0x0000000B
qakMarkComplete = 0x0000000C
qakCreateTaskWithAttachment = 0x0000000D
qakCreateTaskWithText = 0x0000000E
qakNewMessage = 0x0000000F
qakForward = 0x00000010
qakReply = 0x00000011
qakReplyAll = 0x00000012
qakReplyWithMeeting = 0x00000013
qakForwardMessageAsAttachment = 0x00000014
qakNewMeeting = 0x00000015
qakCreateAppointmentWithAttachment = 0x00000016
qakCreateAppointmentWithText = 0x00000017
qakAlwaysMoveMessagesInThisConversation = 0x00000018
qakIgnoreMessagesInThisConversation = 0x00000019
 'Add a quick step that moves the  selected message(s) to the Inbox folder
qakMoveToFolder = 1
set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
set QuickSteps = Session.Stores.DefaultStore.QuickSteps
set QuickStep = QuickSteps.Add("Move to Inbox")
set Folder = Session.GetDefaultFolder(olFolderInbox)
set Action = QuickStep.Actions.Add(qakMoveToFolder)
Action.Folder = Folder
QuickStep.Save
Item(Index) Returns RDOQuickStepAction or on object derived from RDOQuickStepAction with the specified index (1 through Count).
 
Remove Deletes the action.
See also RDOQuickStepAction.Delete