最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
jmail邮件发送代码
时间:2008-04-01 编辑:简简单单 来源:一聚教程网
<%
'***********************发送电子邮件
On error resume next
dim CLStr,msg,mailserver,receive
CLStr=Chr(13) & Chr(10)
mailserver="smtp服务器地址" '邮局服务器地址(smtp服务器地址)
username="登陆名" 'smtp服务器验证登陆名(邮局中开设的任何一个信箱的地址)
password="密码" 'smtp服务器验证密码 (信箱密码)
receive=rs("Email") '接受反馈信息的email地址(可以是您的任何有效信箱)此处为用户注册时所填写的邮箱
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值
msg.Logging = true '启用邮件日志
msg.Charset = "gb2312"
msg.ContentType = "text/html" '邮件的格式为HTML格式
msg.ISOEncodeHeaders = false '是否进行ISO编码,默认为True(加上了这一句)
msg.MailServerUserName = username
msg.MailServerPassword = password
msg.From = username
msg.FromName = username
msg.AddRecipient (Email)
msg.FromName = "***会员中心"
msg.Subject ="亲爱的用户:注册成功"
'msg.Body =request("name")&CLStr
'msg.Body = msg.Body&"新密码:"&ranNum&CLStr
msg.HTMLBody = "内容"
msg.Send (mailserver)
msg.close
set msg = nothing
'********************发送电子邮件结束
%>
-
上一个: asp 实现二级联动菜单
-
下一个: 动网论坛提取的 验证码
相关文章
- wps邮件怎么发送 07-19
- 使用 Haraka 搭建邮件发送服务器步骤 08-22
- python 邮件发送实现方法(基础篇) 08-21
- Spring Boot用JavaMailSender发送邮件方法 08-20
- Laravel 基于 SMTP 驱动实现发送邮件 08-09
- Laravel 中利用MailThief实现邮件发送例子 06-29