从Lotus Notes创建Microsoft Outlook任务

时间:2013-06-13 09:55:07

标签: vba outlook lotus-notes lotus lotusscript

我想从Lotus Notes创建Microsoft Outlook任务并将该任务分配给某人。我在LotusScript中创建任务,如果不将任务分配给任何人,这可以正常工作。但是,我无法使用正确的语法在发送到字段中添加名称(分配任务)。这是我的代码:

Const olTask​​Item = 3     Dim OlApp As Variant     Dim OlTask​​ As Variant

Set OlApp = CreateObject("Outlook.Application")
Set OlTask = OlApp.CreateItem(olTaskItem)

With OlTask
    .Assign
    .Recipients.Add.Name = "Joe Soap" - PROBLEM IS HERE
    .Subject = "Neue Aufgabe - Task"
    .StartDate = Beginnt
    .DueDate = Faellig
    .Status = 1                 
    .Importance = 1             
    .Body = body
    .Display
End With

添加收件人的VBA语法是

.Recipients.Add Name:=“Joe Soap”

但这不会在Lotus Notes中编译。任何人都可以给我正确的语法吗?

1 个答案:

答案 0 :(得分:0)

通过测试(和谷歌搜索)我发现.Recipients.Add(“Joe Soap”)将正确地将名称“Joe Soap”添加到“发送到”字段,前提是“Joe Soap”之前已被定义为Outlook中的联系人。