郁闷死我了，兄弟们帮忙看下，JMAIL

[BadGuyCyh]

jmail.Message 错误 '8000ffff'

The message was undeliverable. All servers failed to receive the message

/sendmail.asp，行 19


这个错误提示是什么原因啊？怎么解决？

-----------------------源码----------------------------------
Function sendEmail(email,topic,mailbody)
on error resume next
dim JMail
Set JMail=Server.CreateObject("JMail.Message")
'JMail.silent=true
JMail.Logging=True
JMail.Charset="gb2312"
JMail.MailServerUserName = "帐号"
JMail.MailServerPassword = "密码"
JMail.ContentType = "text/html"
JMail.Priority = 1
JMail.From= "[e-mail]"
JMail.FromName = "坏小子"
JMail.AddRecipient email
JMail.Subject=topic
JMail.Body=mailbody
JMail.Send ("mail.163.com")
Set JMail=nothing
sendEmail=True
If err then sendEmail=False
End Function

If sendEmail("[e-mail]","标题","测试") = False then
Response.Write "失败"
Else
Response.Write "成功！"
End If

[bluemoon0001]

用jmail发邮件不是100%的能发出的，如果有发不出的就会报这个错，你加入如下代码可以不能服务器报错，报错的信息就可以由你自己定义了：

jmail.silent=true

这样你就可以接收发送邮件时的返回值了。
If JMail.Send ("mail.163.com") then
Response.Write "成功"
Else
if int(jmail1.errorcode)=0 then
restr="你所发送的E_mail地址不存在，或目前失去接受功能！"
else
restr="你所发送的E_mail服务器目前不能接收邮件!"
end if
End If

[bluemoon0001]

用jmail发邮件不是100%的能发出的，如果有发不出的就会报这个错，你加入如下代码可以不让服务器报错，报错的信息就可以由你自己定义了：

jmail.silent=true

这样你就可以接收发送邮件时的返回的错误值了。
If JMail.Send ("") then
Response.Write "成功"
Else
if int(jmail.errorcode)=0 then
restr="你所发送的E_mail地址不存在，或目前失去接受功能！"
else
restr="你所发送的E_mail服务器目前不能接收邮件!"
end if
End If

[BadGuyCyh]

那到底怎么解决啊？我发送邮件就没成功过啊！换了好多地址了！

[chang1216]

第一 你的jmail组件注册了吗?

第二 你的smtp服务 启动了吗?

第三 看看你的邮件地址是否存在

再就是 看看你的邮件服务器配置有没有问题

[BadGuyCyh]

jmail组件注册了
smtp服务启动了
邮件地址也存在的

那就是邮件服务器配置的问题了吧...

那我用的是mail.163.com呀，晕了我！

[BadGuyCyh]

自己顶一下

[bluemoon0001]

试一下：
Function sendEmail(email,topic,mailbody)
on error resume next
dim JMail
Set JMail=Server.CreateObject("JMail.Message")
JMail.silent=true
JMail.Logging=True
JMail.Charset="gb2312"
'JMail.MailServerUserName = "帐号" '去掉验证
'JMail.MailServerPassword = "密码"
JMail.ContentType = "text/html"
JMail.Priority = 1
JMail.From= "[e-mail]"
JMail.FromName = "坏小子"
JMail.AddRecipient email
JMail.Subject=topic
JMail.Body=mailbody
JMail.Send ("") '这里为空
Set JMail=nothing
sendEmail=True
If err then sendEmail=False
End Function

[yongz_0]

All servers failed to receive the message
没有服务器接受到这个信息,你连服务器都没有

[look4sword]

163不支持SMTP发信，换个SMTP服务器试一下。

[千念陌]

163不支持SMTP发信，换个SMTP服务器试一下。?
谁说的？
我怎么就可以！
楼主根本就没有设置发信的smtp地址！！
这样写：JMail.Send ("smtp.163.com")