要确认服务器是否安装jmail组件。

本文介绍使用ASP来发送邮件，使用JMail组件，具体代码如下：

'=============== 发 信 ================

dim JMail
set JMail=server.CreateObject("Jmail.message")
JMail.Silent=true
JMail.Charset = "gb2312"
JMail.FromName = fromname
JMail.from = frommail
JMail.AddRecipient tomail,toname
JMail.Subject = mailtitle
jmail.Body=mailbody & vbcrlf & vbcrlf & mailfoot
JMail.MailServerUserName = mailserverloginname
JMail.MailServerPassWord = mailserverloginpass
JMail.MailDomain = mailuserdomain
sendok=JMail.send(mailserver)
if sendok then
msg="已经成功发送了邮件！"
else
msg="发送邮件失败，可能是您填写了错误的邮件地址。<br>" & _
"如果您确信没有写错邮件地址，则可能是发信程序出了<br>" & _
"故障，请与管理员联系"
end if

版权说明:本站原创文章,由万象互联SEO优化发表.
本文地址:https://www.hulian.top/zixun/post/5374.html