asp调用jmail邮件群发代码
asp调用jmail邮件群发代码。给需要的朋友做个参考。有更好方法的朋友也可以共享一下啊。ie6下测试通过
以下是代码
<html>
<head>
</head>
<body>
<p>正在发送邮件</p>
</body>
</html>
<%
'On Error Resume Next
Sub sendmail(mailtitle,mailurl,mailcontent) '标题，邮件地址，邮件内容
jmail.logging = False
jmail.Silent = True '为TRUE的话可返回邮件是否发送成功
jmail.Charset = "GB2312"
jmail.ContentType = "text/html"
jmail.AddRecipient mailurl '邮件地址
jmail.From = "XX@126.com" '这里是发送邮件的地址，接收的信箱显示
jmail.FromName= "老吧" '邮件发送者姓名
jmail.MailServerUserName = "XX@126.com" '发邮件的地址，这里最好和jmail.from保持一致，否则有的邮件服务器会发不出去。
jmail.MailServerPassword = "××××" '这里是上面那个邮箱密码
jmail.Subject = mailtitle '邮件标题
jmail.htmlBody = mailcontent '邮件内容
If jmail.send("smtp.126.com") Then '设置发送服务器为"smtp"并返回值,
response.write mailurl&" 成功啦<br />"
Else
response.write mailurl&" 失败啦<br />"
End If
jmail.ClearRecipients() '清空已经发送到邮件列表
End Sub
mail="111@xxx.net,222@xxx.net,333@xxx.net,444@xxx.net" '邮件的字符串，以逗号隔开
arraymail=Split(mail,",") '分割
Set jmail = Server.CreateObject("JMAIL.Message")
For i = 0 To UBound(arraymail)
response.write "<script type=""text/javascript"">document.getElementById(""test1"").innerHTML="" [ " & i+1 & " / "&UBound(arraymail)+1&"] "";</script>"
sendmail "测试一个呀",arraymail(i),"你好你好" '调用过程，让它循环
Response.Flush '这个东东可以将缓冲区中编译完成的数据先发送到客户端
jmail.Close()
Set jmail=Nothing
%>
- 本程序源码是JMAIL4.3个人版的发信程序.本来JMAIL有群发的功能.但因为是FREE版本~因此它限制了群发.只能靠循环来群发.
- 用户名应该是完整的邮箱地址.
- 邮箱服务地址可以能过查询可得，如126的为smtp.126.com
注意：现在几乎所有的免费信箱都需要smtp验证，除非发到自己服务器上的，比如lao8.org的邮件只能发到lao8.org
使用jmail的时候避免无法发送的方法：
我以lao8.org为例，
jmail.send="xxx@lao8.com" "这个地址你可以填写自己的，也可以填写莫须有的，但是不能写错
jmai.addrecipient "yyy@lao8.com" "这个地址是真正要发送的地址
这样就可以绕开smtp验证了
- 来源：原创
- 版权声明：版权所有，转载时必须以链接形式注明作者和原始出处及本声明。
- 原创作者：lao8
- 本文链接地址：http://www.lao8.org/html/8/2009-6-4/asp-jmail/
- 文章名：asp调用jmail邮件群发代码
