用webeasymail组件发送邮件
发表于:2007-06-30来源:作者:点击数:
标签:
使用前请先配置好webeasymail,并保证它能发信收信.
@#=======发送邮件给客户
@# 创建MailSend对象
Set mailsend = Server.CreateObject("easymail.MailSend")
mailsend.CreateNew “xxxx“, "temp" xxxxx为发送者的邮件
@# 发信人名称
mailsend.MailName = “xxxx“@# 邮件名称
mailsend.EM_To =“xxxx“ 收件人邮件地址
mailsend.EM_Subject = "xxxx" 邮件主题
mailsend.EM_Text = "xxxx" 邮件内容 支持html格式
if mailsend.Send() = false then
Response.Write "邮件发送失败!"
end if
原文转自:http://www.ltesting.net