用ASP发送邮件方法:
首先
Set mail = Server.CreateObject("CDONTS.NewMail")以呼叫SMTP Service的元件,然后设定:
mail.To = "收件者E-Mail地址"
mail.From = "寄件者的E-Mail地址"
mail.Subject = "主旨"
mail.Body = "E-mail内文"
最后Mail.Send即开始发送邮件。
例如:
<%
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.TO = "abc@xxx.com"
mail.From = "yourmail@xxx.com"
mail.Subject = "主题"
mail.Body = "E-Mail内容"
mail.Send
%>
一切搞定
不用安装也可以,看下面,使用方式最下面
可以通过Jmail组件发送邮件.
首先要在WEB服务器安装JMAIL组件.
下面是一个对象实例,可以通过call SendMail (receive)的方法来调用发送邮件
<%
Sub SendMail(receive)
On Error Resume Next
Set jmail = Server.CreateObject("JMAIL.Message")
jmail.silent = false '屏蔽例外错误,返回FALSE跟TRUE两值
jmail.logging = true '启用邮件日志
jmail.Charset = "gb2312" '
jmail.AddRecipient receive '邮件收件人的地址
jmail.From = "admin@XXX.com.cn" '发件人的E-MAIL地址
jmail.FromName = "主题" '发件人名
jmail.MailServerUserName = "admin" '邮箱用户名
jmail.MailServerPassword = "xxx" '邮箱密码
jmail.Subject = "Message" '邮件主题
jmail.Body = "body" '邮件内容
jmail.Priority = 3 '邮件的紧急程序,1 为最快,5 为最慢, 3 为默认值
mailserver="smtp.xxx.net" '发件服务器
jmail.Send(mailserver) '执行邮件发送(通过邮件服务器地址)
If Err.Number<>0 then
sendMsg="发送失败!"
Else
sendMsg="已发送!"
End If
Response.Write(sendMsg)
jmail.Close()
set jmail=nothing
end sub
%>
jmail 组件可以网上下载
标签:ASP,邮件,发送