使用 VBS 群发电子邮件

Bulk email using VBS

我需要使用 VBS 批量发送电子邮件,但只能测试几封电子邮件,因此无法很好地考虑操作速度。

我有几个纯文本文件,其中包含不同人群的电子邮件地址。

我正在使用 Set objMessage = CreateObject("CDO.Message") 作为发送机制。

我的查询是以下哪项处理速度最快,因此完成时间最少:

  1. 做一个循环,一个一个地读取所有的电子邮件地址,并使用以下内容添加到 objMessage.Bcc 变量: 对于 listLines 中的每一行 bccline = bccline + line + ";" 下一个 objMessage.Bcc = bccline

  2. 循环读取一个电子邮件地址、发送电子邮件等,直到文本文件结束。

我已经用两种方法编写了代码,而且都很好用,但如前所述,我无法真正找出哪种方法最快。

我将不胜感激 feedback/suggestions。

此致。

选项 #1 肯定会更快。每次执行发送邮件命令时,程序都需要将完整的数据传递给邮件server/service进行处理。执行发送命令的时间越短,整个程序完成的速度就越快。

就快速投递而言,选项 1 是最佳选择,因为您要将一封邮件发送到 MTA,而 MTA 会处理对其余邮件的投递。

另一个选项

例如,如果您需要根据您需要的文本文件为特定个人或个人群体专门定制的消息,发送这些消息的最快方法是使用 shell 执行 w/o 等待开始下一个.. 正在发送带有参数或命名参数的电子邮件脚本。

命名参数是这样的:/to:user@suchandsuch.com。使用它的棘手部分是避免使 CMD 变得胡思乱想的字符。因此,构建一个函数来转义可能导致 CMD 以不同方式解释字符的字符......我完全支持规模,所以这就是我可能使用的方法。但如果只是一般广播 - BCC 是您的最佳选择。