[求助]大家进来帮帮忙 - ASP技术论坛

问题点数：0 回复次数：1

[求助]大家进来帮帮忙

大家进来帮帮忙

我在租用的空间上测试在线发信,用126.com的帐号发能成功,用绑定域名的企业邮局帐号发不成功,是不是代码不正确呢?请各位帮帮忙.

<% dim JMail
Set JMail=Server.CreateObject("JMail.Message")
JMail.silent = true '则errorcode包含的是错误代码
JMail.Logging=True '是否使用日志
JMail.Charset="gb2312"
JMail.ContentType = "text/html" 'text/html是超文本格式text/plain是文本格式
JMail.MailServerUserName = "mm1733" '您的邮件服务器登录名
JMail.MailServerPassword = "123****" '登录密码
JMail.From ="mm1733@126.com" '发件人
JMail.FromName = "测试" '发件人姓名
JMail.AddRecipient "gdmmdiy@21cn.com" '收件人
JMail.Subject = "您的密码" '主题
JMail.Body = AccountName & ":你好!您的密码是" '正文
JMail.Send "smtp.126.com" 'smtp服务器地址
JMail.Priority=3 '1: 最高优先级.2:高 3:普通 4:低 5:最低
if err then err.description
Set JMail=nothing

%>
已上能成功。
下面用我的企业邮箱号不成功。(邮局系统是：WebEasyMail ）
<% dim JMail
Set JMail=Server.CreateObject("JMail.Message")
JMail.silent = true '则errorcode包含的是错误代码
JMail.Logging=True '是否使用日志
JMail.Charset="gb2312"
JMail.ContentType = "text/html" 'text/html是超文本格式text/plain是文本格式
JMail.MailServerUserName = "web@diytd.com" '您的邮件服务器登录名
JMail.MailServerPassword = "123***" '登录密码
JMail.From ="web@diytd.com" '发件人
JMail.FromName = "测试" '发件人姓名
JMail.AddRecipient "gdmmdiy@21cn.com" '收件人
JMail.Subject = "您的密码" '主题
JMail.Body = AccountName & ":你好!您的密码是" '正文
JMail.Send "mail.diytd.com" 'smtp服务器地址
JMail.Priority=3 '1: 最高优先级.2:高 3:普通 4:低 5:最低
if err then err.description
Set JMail=nothing

%>