| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 634 人关注过本帖
标题:jmail发邮件,哪位高手快来帮帮我~!~!~!
取消只看楼主 加入收藏
长发男孩儿
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-12-27
收藏
 问题点数:0 回复次数:0 
jmail发邮件,哪位高手快来帮帮我~!~!~!

我写了一个让客户按提交把表单资料发送到信箱里的asp文件,
下边是处理页面部分源代码,
(我用的是自己的邮箱往自己的邮箱里发件办法)
页面也可以正常处理,可是邮箱里就是收不到邮件,请问是为什么??????
请哪位高手帮帮我吧,我弄了三天了也没有弄出来,谢谢~~~~~~~~~~~!
“li是做好的要发送的资料”

function sendemail(sname,mailbody)
sname="webmaster@sjcww.com"
mailbody=li

dim jmail
err.clear
on error resume next
set jmail=server.CreateObject("jmail.message")
if err.number<>0 then
sendmail=0 : err.clear : exit function
end if
smtp="mail.sjcww.com"

'设置发邮件服务器
jmail.serveraddress=smtp
jmail.silent=true
jmail.logging=true
jmail.charset="gb2312"
jmail.contenttype="text/html"
'设置发件人信箱
jmail.sender=sname
'设置发信人名字
jmail.FromName=name1

jmail.priority=1
'设置收信人信箱
jmail.AddRecipient sname
'设置主题
jmail.subject="我要定购"
'设置信件内容
jmail.body=mailbody
'设置发件信箱用户名
jmail.mailserverusername= "webmaster"
'设置发件信箱秘码
jmail.mailserverpassword="***********"

'开始发送
jmail.send smtp
jmail.Close
sendmail=1
set jmail=nothing

end function

搜索更多相关主题的帖子: jmail 邮件 手快 
2005-12-27 13:49
快速回复:jmail发邮件,哪位高手快来帮帮我~!~!~!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.042216 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved