主题:【求助!】请问谁比较懂网页技术? -- airman
是不能发送,还是有错误信息,还是没有收到?
根据自己以前了解的,下面这段代码应该可以直接给你设定的邮件地址发送邮件来测试邮件功能是否正常。必要的注释我已经加了,需要修改的地方也说明了。你可以修改一下然后放到网站上直接运行这个看看是否有出错信息。
另外,文档可以在这里找到 www.dimac.net
<%@ Language = VBScript %>
<%
dim jamil, isgo, msg
set jmail= server.CreateObject ("jmail.message")
jmail.Silent = true
jmail.Charset = "gb2312"
JMail.ContentType = "text/html"
jmail.From = "your own email address here"
jmail.FromName = "For Test"
jmail.ReplyTo = "Your own email address here"
jmail.Subject = "测试用"
jmail.AddRecipient "email address you want to send info to"
jmail.Body = "测试内容" '' should be jmail.HTMLBody="blabla.." 如果你需要HTML格式的邮件的话
jmail.MailServerUserName = smtpuser '' 替换为你的邮件地址的用户名
jmail.MailServerPassWord = smtppwd ''你的邮件地址的密码
isgo = jmail.Send(smtpserver) '''发送邮件所使用的SMTP服务器,例如smtp.163.com,请修改
if isgo then
msg="邮件发送成功!谢谢你的支持。"
else
msg = jmail.ErrorMessage
end if
response.write msg
response.end
%>
- 相关回复 上下关系8
🙂【求助!】请问谁比较懂网页技术? airman 字283 2006-05-14 02:58:29