可以用一个循环来设置:
aryEmail = split("aa@bb.com;adf@sfda.net;dsfafdsa@china.com", ";")
for i=0 to UBound(aryEmail)
JMail.AddRecipient Trim(aryEmail(i))
next