○背景: Email地址存于MSSql一用...... 背景: Email地址存于MSSql一用户信息表中,数量上万。 公司自有服务器,集SMTP,POP3,WWW,FTP,MSSql,DNS等多种服务于一身。 JMAIL 有MailMerge对象,但是免费版不能用 要求: 用ASP+JMAIL,利用公司SMTP向所有用户发送EMAIL 思路: 直接读取数据库,多次循环发送,会对本来配置不高的服务器造成很大压力。 最好能对EMAIL分批发送,每批发送间隔一段时间,以此来缓解对服务器造成的压力。 实现: 对EMAIL分批 读出记录到recordset,利用常见的分页程序,将所有记录分页,每页作为一批,有多少页就分多少批 间隔延迟 在每页执行完毕后用来延迟跳转 减少执行时间: 在循环的过程中,循环添加收件人,而不要循环发送,即 for i=1 to rs.pagesize msg.AddRecipient rs("Email") rs.movenext next msg.Send ("smtp.abc.com") 减小邮件大小 循环添加收件人,会造成一封Email的收件人很多,这样一封Email的就会很大。 所以,在以上代码的基础上改进一下,在循环内做个判断,当收件人Email数量到达 20的时候就发送一次。即: for i=1 to rs.pagesize msg.AddRecipient rs("Email") if i mod 20 = 0 then '每 20 个收信人作为一封Email发送一次 msg.Send ("smtp.abc.com") msg.ClearRecipients '清除已发送的收信人 end if rs.movenext next msg.Send ("smtp.abc.com") '发送余下的 页面 Mail.asp 包含邮件主题、正文的表单, |
|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )
GMT+8, 2024-9-29 17:27 , Processed in 0.244192 second(s), 12 queries , Gzip On, MemCache On.
Powered by Discuz! X3.5
© 2001-2023 Discuz! Team.