for each u as string in "张三,李四".split(",")
m.AddReceiver(u)
next
for each u as string in "d:\test.xls,d:\abc.txt".split(",")
m.AddAttachments(u)