当前位置:软件学习 > 其它软件 >>

求助!如何实现向两个域中的收件人同时发邮件?

邮件收件人存放在两个域中:pDoc.ReceiptPerson和pDoc.SpecialReceiptPerson

原来是分开发邮件的:

If pDoc.ReceiptPerson(0) <> "" Then
mailDoc.SendTo = pDoc.ReceiptPerson
Call mailDoc.Send( False )
End If

If pDoc.SpecialReceiptPerson(0) <> "" )Then
mailDoc.SendTo = pDoc.SpecialReceiptPerson
Call mailDoc.Send( False )
End If


现在想向两个域中的收件人同时发邮件,该如何实现呢?
mailDoc.SendTo = pDoc.ReceiptPerson + pDoc.SpecialReceiptPerson
这样直接相加会报错.......

大家帮帮忙....谢了  --------------------编程问答-------------------- mailDoc.SendTo = ArrayAppend(pDoc.ReceiptPerson,pDoc.SpecialReceiptPerson ) --------------------编程问答-------------------- sendto的值可以是数组 --------------------编程问答-------------------- 谢了
我再加了个Arrayunique,把重复的mail地址去掉

mailDoc.SendTo = Arrayunique( Arrayappend( pDoc.ReceiptPerson , pDoc.SpecialReceiptPerson )) --------------------编程问答--------------------        用数组
        Dim temp(2) As Variant
temp(0)=doc.ITEM(0)
temp(1)=doc...
maidoc.sendto=temp --------------------编程问答-------------------- 那个sendto可以使数组,也可以理解是variant类型。
在domino里面就一个多值域·
--------------------编程问答-------------------- mark --------------------编程问答-------------------- mailDoc.SendTo = Evaluate(|@unique(ReceiptPerson:SpecialReceiptPerson)|,pDoc)
补充:企业软件 ,  Lotus
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,