关于邮箱的一个问题,在线等待
为什么163的用户可以给我发邮件,而雅虎的用户却不能给我发。代码如下:
<HTML>
<BODY>
<%
dim CLStr,msg,mailserver,username,password,receive
CLStr=Chr(13) & Chr(10)
'请在此修改相关信息
mailserver="SMTP.163.com" '邮局服务器地址(smtp服务器地址)
username=Request.Form("emailaddress") 'smtp服务器验证登陆名(邮局中开设的任何一个信箱的地址)
password="123456" 'smtp服务器验证密码(信箱密码)
receive="bestzyf@163.com" '接受反馈信息的email地址(可以是您的任何有效信箱)
'修改结束
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = username
msg.MailServerPassword = password
msg.From = username
msg.FromName = username
msg.AddRecipient (receive)
msg.Subject = Request.Form("mailsubject")
'msg.Body = "网站在线反馈"&CLStr&CLStr
'msg.Body = msg.Body&"对方姓名:"&Request.Form("name")&CLStr
'msg.Body = msg.Body&"对方信箱:"&Request.Form("email")&CLStr
msg.Body = "公司名称:"&Request.Form("unitname")&CLStr&"姓名:"&Request.Form("username")&clstr&"联系地址:"&Request.Form("address")&clstr&"具体休求:"&clstr&Request.Form("jqnumber")
msg.Send (mailserver)
msg.close
set msg = nothing
%>
<p>邮件发送成功,谢谢使用</p>
</BODY>
</HTML>