求救!!!Jmail发送邮件错误
Set jmail = Server.CreateObject("JMail.Message")
jmail.logging = true '启用使用日志
jmail.Charset = "GB2312" '邮件文字的代码为简体中文
jmail.ContentType = "text/html" '邮件的格式为HTML的
jmail.AddRecipient MemberEmail '邮件的收件人
jmail.FromName = "邓水平" '邮件发送者的姓名
JMail.MailServerUserName = "dsp4689@sina.com" '您的邮件服务器登录名
JMail.MailServerPassword = "4689dsp" '登录密码
jmail.Priority = 1 '邮件的紧急程序,1 为最快,5 为最慢, 3 为默认值
jmail.From = "market@gl200.com"
JMail.Subject = "您的登录密码"
JMail.AddRecipient(rs.Fields.Item("upassword").Value)
JMail.Body = "尊敬的用户您好,首先感谢您使用我们的服务!." & VBCrLf & vbCrLf
JMail.Body = JMail.Body & "您的用户名是:" &(rs.Fields.Item("uname").Value) & vbCrLf
JMail.Body = JMail.Body & "您的注册邮箱是:" &(rs.Fields.Item("email").Value) & vbCrLf
JMail.Body = JMail.Body & "您的登录密码是:" &(rs.Fields.Item("upassword").Value) & vbCrLf
JMail.Body = JMail.Body & "请妥善保管您的密码,如再次遗忘密码,请登录至http://www.gl200.com/bbs/jsp.asp 取回您的密码,谢谢您使用本系统。" & vbCrLf
JMail.Body = JMail.Body & "顺祝商祺!" & vbCrLf
JMail.Body = JMail.Body & "上海工理电子有限公司"
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
jmail.Send ("mail.192.168.0.119:25") 'smtp服务器地址(企业邮局地址)
JMail.close
'jmail.Message 错误 '8000ffff'
The message was undeliverable. All servers failed to receive the message