使用前请先配置好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
'=======发送邮件给客户
' 创建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
相关信息
- 关于本站 - 网站帮助 - 广告合作 - 下载声明 - 友情连接 - 网站地图 - 管理登陆
- Copyright © 2003-2007 ZhuYe123.COM. All Rights Reserved . 粤ICP备05072659号
- 致力于中国个人网站发展,我们一直在努力!