想知道我的代码问题出在哪,这可是我所有的分了~!
Dim JMail, contentId
Set JMail = Server.CreateObject("JMail.Message")
JMail.Charset = "gb2312"
JMail.From = "xunche@xunche.com"'发件人,这儿要和后面服务器相对应
JMail.FromName = "管理员"
JMail.Subject = "Subjects"
'contentId = JMail.AddAttachment (filename, True)
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.AddRecipient "zch8301@sina.com"
'JMail.HTMLBody = "<center>点击这里<a href=' cid:" & contentId & "' >[附件文件]</a>将文件保存</center>"
' 邮件主体(文本部分)
JMail.Body = "Bodys"
JMail.Send("xhe:'955235@mail.xun.com")
JMail.Close()
Set JMail = Nothing
if err<>0 then
response.write "发送失败!"
else
response.write "发送成功!"
end if
问题点数:17、回复次数:6Top




