• 主页
  • ASP
  • .NET Framework
  • Web Services
  • VB
  • VC
  • 图表区
  • 分析与设计
  • 组件/控件开发
  • LINQ

asp 用Jmail发邮件???

rongcong 2004-12-24 01:16:39
JMail.ServerAddress=??

JMail.MailServerUserName = ??
JMail.MailServerPassWord = ??
JMail.MailDomain = ??

这项就该怎么设计才能在线发邮件呢?在线等。在此先谢谢了!
...全文
48 点赞 收藏 2
写回复
2 条回复
southidc 2005年02月03日
function send_jmail(j_sendname,j_Subject,j_HTMLBody,j_name,j_email)
on error resume next
dim Jmail
Set Jmail=server.createobject("Jmail.Message")

Jmail.Charset="gb2312"
Jmail.Priority=3 '优先级
Jmail.MailServerUserName=MailServerUserName '这里换成您的SMTP验证帐号
Jmail.MailServerPassword=MailServerPassWord '这里填写您的SMTP认证密码
Jmail.From=j_email '发信人邮件地址
Jmail.FromName=j_name '发信人姓名
Jmail.Subject=j_Subject '信件主题
Jmail.AddRecipient j_sendname '收信人地址
'Jmail.Body=j_HTMLBody 'TXT Mailbody参数是信件正文
JMail.HTMLBody=j_HTMLBody 'HTML信件正文
Jmail.Send(MailServer) '发信的邮件服务器
Set Jmail=nothing
send_jmail=true
if err then
SendMail= "<br><li>没有安装JMail组件</li>"
err.clear
send_jmail=false
end if
end function
回复 点赞
simon8181 2005年02月03日
up
回复 点赞
发动态
发帖子
.NET技术社区
创建于2007-09-28

4.9w+

社区成员

66.8w+

社区内容

.NET技术交流专区
社区公告
暂无公告