Outlook VBA教程:GetAssociatedTask方法

返回TaskItem对象,代表请求的任务。

注意 除非在调用 GetAssociatedTask方法之前处理 TaskItem,否则该方法无法执行。若要执行该任务,请在调用 GetAssociatedTask 之前调用Display方法。

expression.GetAssociatedTask(AddToTaskList)

expression  必选。该表达式返回“应用于”列表中的一个对象。

AddToTaskList  必选,Boolean 类型。如果将任务添加到默认的“任务”文件夹中,则为 True。

VBA示例

本示例接受TaskRequestItem,在不显示检查器的情况下发送响应。


Set myolapp = CreateObject("Outlook.Application")
Set myNameSpace = myolapp.GetNamespace("MAPI")
Set myTasks = myNameSpace.GetDefaultFolder(olFolderInbox)
Set mytaskreqItem = myTasks.items.Find _
    ("[Subject] = ""Meeting w/ Jerry Wheeler""")
If Not TypeName(mytaskreqItem) = "Nothing" Then
   'The task is displayed.
   mytaskreqItem.Display
   Set myNewTaskItem = mytaskreqItem.GetAssociatedTask(True)
   myNewTaskItem.Respond olTaskAccept, True, True
End If

如果使用 VBScript,则不创建Application对象,而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。


Set myNameSpace = Application.GetNamespace("MAPI")
Set myTasks = myNameSpace.GetDefaultFolder(6)
Set myTaskReqItem = myTasks.items.Find("[Subject] = ""Meeting w/ Jerry Wheeler""")
If Not TypeName(myTaskReqItem) = "Nothing" Then
   'The task is displayed.
   myTaskReqItem.Display
   Set myNewTaskItem = myTaskReqItem.GetAssociatedTask(True)
   myNewTaskItem.Respond 2, True, True
End If

上页:Outlook VBA教程:GetAssociatedAppointment方法 下页:Outlook VBA教程:GetDefaultFolder方法

Outlook VBA教程:GetAssociatedTask方法:相关链接

Outlook VBA教程:GetDefaultFolder方法 Outlook VBA教程:GetExplorer方法
Outlook VBA教程:GetFirst方法 Outlook VBA教程:GetFolderFromID方法
Outlook VBA教程:GetFreeBusy方法 Outlook VBA教程:GetItemFromID方法
Outlook VBA教程:GetLast方法 Outlook VBA教程:GetMember方法
Outlook VBA教程:GetNameSpace方法 Outlook VBA教程:GetNext方法
Outlook VBA教程:GetOccurrence方法 Outlook VBA教程:GetPageInfo方法
Outlook VBA教程:GetPrevious方法 Outlook VBA教程:GetRecipientFromID方法
Outlook VBA教程:GetRecurrencePattern方法 Outlook VBA教程:GetSharedDefaultFolder方法
Outlook VBA教程:GoToDate方法 Outlook VBA教程:HideFormPage方法
Outlook VBA教程:IsPaneVisible方法 Outlook VBA教程:IsSearchSynchronous方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号