jmail问题，急～～！up有分

[qfacy]

兄弟，帮我看看下面的代码！我为什么发不出去 !
前提：1,机器上有jmail4.4专业版本
2，我在自己的机器上调试！
3，同一个网络

问题：我用通过邮件服务器地址，用户名和密码来发送邮件，发送的邮件可以成功（如代码片断1），但是我现在想不通过邮件服务器地址，用户名和密码来发送邮件(如代码片断2)，我测试了一个上午也不行！我想不是网络的问题，是我代码的问题！如果有其他的不用通过邮件服务器地址，用户名和密码来发送邮件，请各位兄弟给予提示！！在此感谢

代码片断1
<%
Set jmail=Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
jmail.silent=true '屏蔽例外错误，返回FALSE跟TRUE两值j
jmail.logging=true '启用邮件日志
jmail.Charset="GB2312" '邮件的文字编码为国标
jmail.ContentType ="text/html" '邮件的格式为HTML格式
jmail.AddRecipient "[e-mail]" '邮件收件人的地址
jmail.From ="[e-mail]" '发件人的E-MAIL地址
'jmail.MailServerUserName="zfawj" '登录邮件服务器所需的用户名
'jmail.MailServerPassword="11111" '登录邮件服务器所需的密码
jmail.Subject="1111" '邮件的标题
jmail.Body="11111" '邮件的内容
jmail.Priority=1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认值
'jmail.Send("smtp.163.com") '执行邮件发送（通过邮件服务器地址）
jmail.Close() '关闭对象
%>


代码片断2
<%
on error resume next
Set JMail = Server.CreateObject("JMail.SMTPMail") '建立发送邮件的对象(S)
JMail.LazySend = (True)
JMail.Silent = (True)
JMail.Charset = ("GB2312")
JMail.ContentType = ("text/html")
JMail.Sender = ("[e-mail]")
JMail.ReplyTo = ("[e-mail]")
JMail.SenderName = ("客户反馈")
JMail.Subject = ("[e-mail]")
JMail.SimpleLayout = (True )
JMail.Body = ("[e-mail]")
JMail.Priority = (3)
JMail.AddRecipient (E_mail)
JMail.AddHeader "Originating-IP", GBL_IPAddress
If JMail.Execute()
JMail.Close() '关闭对象
Set JMail = Nothing%>

[qfacy]

各位帮帮忙！
自己up

[hfkj]

你的这个想法，好像不可行

[mind_1220]

你先看看是你没有收到
还是被甩到了垃圾箱中。。。
以前我就遇到过这种郁闷的问题

[Aspclass]

我觉得那那种写法好像有问题，要仔细看。。。。

[leo963258]

JMAIL组件发信例子
set mailobj = server.CreateObject("jmail.smtpMail")
mailobj.silent = true
mailobj.logging = true
mailobj.subject = subject
mailobj.body = mailbody
mailobj.addrecipient fromemail
mailobj.serveraddress = "mail.xxx.com" '这里是发邮件服务器的地址
mailobj.sender = "[e-mail]" '发件人的地址
mailobj.senderName = "帅青蛙" '发件人的姓名
mailobj.execute()if err.number <> 0 then response.write "邮件没有发送成功"
else response.write "邮件发送成功"
end if
set mailobj = nothing

[qfacy]

接受不到！
to hfkj(海风(在不停的努力)) ( ) 信誉：100
应该可行的！网上有个系统就是这个样子的！

to Aspclass(Asp初学者) ( ) 信誉：100
我看了很多次了！就是找不到错误

[cestar2005]

Function sendJMail(title,content,tomail)
set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = "[e-mail]"
msg.MailServerPassword = "ygh"
msg.From = "[e-mail]"
msg.FromName = "aaa"
msg.addRecipient tomail
msg.Subject = title
msg.Body = content
msg.Send("smtp.163.com")
set msg = nothing

End Function

Call sendJMail("Test","Test","[e-mail]")

这个可以收到的，你的验证用户名处改下就可以了，加上[e-mail]

[zhangfeng1133]

http://community.csdn.net/Expert/TopicView.asp?id=3144599

[zhangfeng1133]

http://community.csdn.net/Expert/TopicView.asp?id=4053228

[mfkiqpl]

UP

[bora521]

up ,too

[http3w]

我知道的是cdonts可以通过本机的smtp发邮件,不要专门的服务器,参考一下winmail吧

[wgf001]

UP

[ahcs]

up

[阿门]

up

[raas]

up

[river6023]

up,too

[baggio2008]

学习