lotusscript:How 向收件人添加两个或更多电子邮件 ID

lotusscript:How to add two or more email id to the Recipients

我已经有了可以正常工作的 lotusscript 代码但是现在我必须在收件人中为下面的代码再添加一个电子邮件 ID

当前代码:

Call currdoc.Save(True, False)
Set maildoc2 = New NotesDocument(maildb)
maildoc2.Form = "Menu"
maildoc2.Type = "Color Code"
maildoc2.SendTo = "lotwor@col.com"
maildoc2.Recipients = "lotwor@col.com"
maildoc2.From = "FRIENDS/COLOR"
maildoc2.Body = "This automated email message"

我尝试使用两种方法再添加一个电子邮件 ID 作为 lotusrt@cot.com,但仍然无法正常工作。

 first way:

Call currdoc.Save(True, False)
    Set maildoc2 = New NotesDocument(maildb)
    maildoc2.Form = "Menu"
    maildoc2.Type = "Color Code"
    maildoc2.SendTo = "lotwor@col.com",lotusrt@cot.com
    maildoc2.Recipients = "lotwor@col.com",lotusrt@cot.com
    maildoc2.From = "FRIENDS/COLOR"
    maildoc2.Body = "This automated email message"

第二种方法是这样创建地址码

Dim addressesss (1 To 2) As String
    addressesss(1) = "lotwor@col.com",
    addressesss(2) = "lotusrt@cot.com"

    Set maildoc2 = New NotesDocument(maildb)
    maildoc2.Form = "Menu"
    maildoc2.Type = "Color Code"
    maildoc2.SendTo = addressesss
    maildoc2.Recipients = addressesss
    maildoc2.From = "FRIENDS/COLOR"
    maildoc2.Body = "This automated email message"

谁能告诉我需要对上述代码进行哪些更正,以便将电子邮件发送到两个电子邮件 ID,感谢您的帮助和时间。

目前电子邮件没有发送给特定的收件人。

第二种方式是正确的,但你的第二个电子邮件地址可能有错字?

Dim addresses (1 To 2) As String
addresses(1) = "lotwor@col.com",
addresses(2) = "lotusrt@col.com"

Set maildoc2 = New NotesDocument(maildb)
maildoc2.Form = "Menu"
maildoc2.Type = "Color Code"
maildoc2.SendTo = addresses
maildoc2.Recipients = addresses
maildoc2.From = "FRIENDS/COLOR"
maildoc2.Body = "This automated email message"