假设邮件账号密码为
name@126.com
password
你要发送的邮件账号为
send@126.com
函数:
<%
Sub SendMail(receive,obj,body)
On Error Resume Next
Set jmail = Server.CreateObject("JMail.Message")
jmail.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值
jmail.logging = true '启用邮件日志
jmail.Charset = "gb2312" '
jmail.AddRecipient(receive) '邮件收件人的地址
jmail.From = "name@126.com" '发件人的E-MAIL地址
jmail.FromName = "发件姓名" '发件人名
jmail.MailServerUserName = "name" '邮箱用户名
jmail.MailServerPassword = "password" '邮箱密码
jmail.Subject = obj '邮件主题
jmail.Body = body '邮件内容
jmail.Priority = 1 '邮件的紧急程序,1 为最快,5 为最慢, 3 为默认值
mailserver="smtp.126.com" '发件服务器
jmail.Send(mailserver) '执行邮件发送(通过邮件服务器地址)
jmail.Close()
set jmail=nothing
end sub
%>
调用的时候:
call SendMail("send@126.com","主题","内容")
概念:
JMail是服务器端所需要的组件
smtp是发送邮件功能的服务器。(我们使用的FTP服务器 通常没有这个功能,所以 我们 用自己的FTP服务器,发送邮件的时候发送到126的smtp服务器,它会自动帮我们发送)