用Jmail 发信， 还是收不到，老大门来帮帮忙
现在用jmail 发信，可是还没反映。。。。，老大帮我看看我有什么地方不对吗？
Sub SendAction()
On Error Resume Next
Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
jmail.ISOEncodeHeaders = False'邮件头不使用ISO-8859-1编码
jmail.ContentTransferEncoding = "base64"'邮件编码设为base64
jmail.AddHeader "Priority","3"'添加邮件头,不要改动！
jmail.AddHeader "MSMail-Priority","Normal"'添加邮件头,不要改动！
jmail.AddHeader "Mailer","Microsoft Outlook Express 6.00.2800.1437"'添加邮件头,不要改动！
jmail.AddHeader "MimeOLE","Produced By Microsoft MimeOLE V6.00.2800.1441"'添加邮件头,不要改动！
jmail.silent = true '屏蔽例外错误，返回FALSE跟TRUE两值j
jmail.logging = true '启用邮件日志
jmail.Charset = "GB2312" '邮件的文字编码为国标
jmail.ContentType = "text/html" '邮件的格式为HTML格式
jmail.AddRecipient "duting1030@163.com, czcldt@msn.com, czc0217@sina.com" '邮件收件人的地址
jmail.From = "czc0217@126.com" '发件人的E-MAIL地址
jmail.MailServerUserName = "czc0217@126.com" '登录邮件服务器所需的用户名
jmail.MailDomain = "smtp.126.com"
jmail.MailServerPassword = "××××××" '登录邮件服务器所需的密码
jmail.Subject = "Mail Subject" '邮件的标题
jmail.Body = "Mail Body" '邮件的内容
jmail.Send("smtp.126.com") '执行邮件发送（通过邮件服务器地址）
jmail.Close() '关闭对象
Set jmail=nothing
End Sub
问题点数：0、回复次数：5Top
1 楼yxhzj（余华[学习J2EE中]）回复于 2005-06-01 13:22:33 得分 0
看了半天
jmail.MailServerUserName = "czc0217@126.com" '登录邮件服务器所需的用户名
应该是这里错了吧
以前好象就写一126的用户名字,后面的@126.com不要的Top
2 楼madpolice（午夜狂龙）回复于 2005-06-01 13:40:16 得分 0
http://community.csdn.net/Expert/TopicView.asp?id=4026439Top
3 楼zhangfeng1133（）回复于 2005-06-02 18:19:55 得分 0
同意楼上的,去看看比较详细的jmail函数把Top
4 楼Ibanez119（）回复于 2005-07-15 15:26:59 得分 0
jmail.MailServerUserName = "czc0217" '登录邮件服务器所需的用户名Top
5 楼Ibanez119（）回复于 2005-07-15 15:27:19 得分 0
jmail.MailServerUserName = "czc0217" '登录邮件服务器所需的用户名Top
