日期:2008-12-28  浏览次数:20836 次

使用前请先配置好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