主题:[原创]利用jmail 发送注册邮件总是失败的疑问?
我想在用户注册时候 同时发一封电子邮件给对方,用户注册时候要填写自己的邮箱,点注册按键后,将会使用response.write "<script>window.location='email.asp?email=" & email & "'</script>" 把用户填写的邮件地址提交到另外一个 负责发送邮件的asp,该ASP代码如下,但是我的邮箱总是只成功收到一两次邮件,后来就不成功了(只有使用163的VIP邮箱才可以成功几次次,别的邮箱还不一定能成功发送邮件呢),不知道是什么原因,我估计是被邮箱的过滤系统过滤掉了,请问大虾们,你们一般用什么方式来实现 发送邮件给注册用户呢?
<%
email=trim(request("email")) '接收注册用户的网页提交过来的邮件
Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
jmail.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值
jmail.logging = true '启用邮件日志
jmail.Charset = "GB2312" '邮件的文字编码为国标
jmail.AddRecipient email '邮件收件人的Email地址
jmail.From = "123@vip.163.com" '发件人的E-MAIL地址
jmail.MailServerUserName = "123" '登录邮件服务器所需的用户名
jmail.MailServerPassword = "123456" '登录邮件服务器所需的密码
jmail.Subject = "123在999发的邮件"
jmail.Body = "123啊999发的邮件啊" '邮件的内容
jmail.Send("smtp.vip.163.com") '执行邮件发送(通过邮件服务器地址)
jmail.Close() '关闭对象
set jmail=nothing
response.write "<script>alert('邮件发送成功!');window.openner=null;window.close
();</script>" '弹出提示框
%>
<%
email=trim(request("email")) '接收注册用户的网页提交过来的邮件
Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
jmail.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值
jmail.logging = true '启用邮件日志
jmail.Charset = "GB2312" '邮件的文字编码为国标
jmail.AddRecipient email '邮件收件人的Email地址
jmail.From = "123@vip.163.com" '发件人的E-MAIL地址
jmail.MailServerUserName = "123" '登录邮件服务器所需的用户名
jmail.MailServerPassword = "123456" '登录邮件服务器所需的密码
jmail.Subject = "123在999发的邮件"
jmail.Body = "123啊999发的邮件啊" '邮件的内容
jmail.Send("smtp.vip.163.com") '执行邮件发送(通过邮件服务器地址)
jmail.Close() '关闭对象
set jmail=nothing
response.write "<script>alert('邮件发送成功!');window.openner=null;window.close
();</script>" '弹出提示框
%>