关于邮箱的一个问题,在线等待

hyhfzj 2003-10-09 06:42:17
为什么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>
...全文
37 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
yangsm 2003-10-10
  • 打赏
  • 举报
回复
关注……
xuzhe1111 2003-10-09
  • 打赏
  • 举报
回复
支持jmail么?
lymyx 2003-10-09
  • 打赏
  • 举报
回复
你用的组件不支持吧?

1,451

社区成员

发帖
与我相关
我的任务
社区描述
多媒体/设计/Flash/Silverlight 开发 图象工具使用
社区管理员
  • 图象工具使用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧