用JMail发送邮件报错The message was undeliverable.All servers failed to receive the messag

用JMail发送邮件报错The message was undeliverable.All servers failed to receive the messag
用JMail发送邮件报错The message was undeliverable.All servers failed to receive the message
dim JMail
Set JMail = Server.CreateObject("JMail.Message") JMail.Logging = True
JMail.Charset = "gb2312"
JMail.ContentType = "text/html"
JMail.FromName = "ssunmoon"
JMail.MailServerUserName = "ssunmoon"
JMail.MailServerPassword = "******"
JMail.Priority = 1
JMail.Subject = "测试"
JMail.Body = "测试"
JMail.Send("smtp.163.com")
Set JMail = nothing
If err then
Response.write "发送错误"
response.write Err.Description
else
response.write "邮件发送成功!"
end if
我从网上查过了都没能解决.
严重鄙视超来的一大堆东西……
那兄弟别废话行吗,我要能找到我在这摆摊儿来呀?会你就说.
还有没有人来回答呀?
单机,服务器都试过了就是发不出去,我刚装的jmail一定支持,服务器上的也支持.
万代玉 我用的不是jsp你写的我好像用不到.