用Jmail组件发邮件没反应WIN7系统
代码如下。新注册个用户。就自动发送邮件。但是没出错也没回应。都不知道是不是WIN7用不了Jmail组件。哎。。
dim JMail
set JMail=server.CreateObject("Jmail.message")
JMail.Silent=true
JMail.Charset = "utf-8" '邮件字符编码
jmail.ContentType = "text/html"
jmail.Priority = 1
JMail.FromName = "johndon1983"'发送人姓名
JMail.from = "johndon1983@sina.com"'发送人的邮箱地址
JMail.AddRecipient request.form("email")'收信人的邮箱地址和姓名
JMail.Subject = "感谢注册本站会员"'邮件标题
jmail.Body= Request.Form("用户名") & ":感谢您注册本站会员，请记住你的用户名：" & Request.Form("用户名") & "，密码：" & Request.Form("密码")'邮件主要内容
JMail.MailServerUserName = "johndon1983@sina.com"'发信人的邮箱登录用户名
JMail.MailServerPassWord = 123465'发信人的邮箱登录密码,读者应该修改为自己邮箱系统的系统配置
JMail.MailDomain = "pop.sina.com"'发送人的接收邮件服务器
sendok=JMail.send("smtp.sina.com")'利用send方法从发送人的发送邮件服务器发送邮件
if sendok then'发送结果，返回一个逻辑值，为true表示成功，否则失败
msg="已经成功发送了邮件！"
else
msg="发送邮件失败，可能是您填写了错误的邮件地址。<br>" & _
"如果您确信没有写错邮件地址，则可能是发信程序出了<br>" & _
"故障，请与管理员联系"
end if
jmail.close()
[解决办法]
你的win7什么位的？Jmail好像只有32位的
