ASP实现在提交表单到数据库的同时发邮件通知

<%

dim objCDOMail

Set objCDOMail = Server.CreateObject("CDONTS.NewMail")

objCDOMail.From ="xxx@hotmail.com"

objCDOMail.To =xxx@hotmail.com '接收人的邮箱(将表单内容发邮件到一固定地址)

objCDOMail.Subject ="邮件发送测试"

body=request.Form("cont") '获取表单内容

objCDOMail.Body =body

objCDOMail.BodyFormat=1 '设置为HTML格式

objCDOMail.Send

Set objCDOMail = Nothing

%>

---------------------------------------------------------------

在存入数据库前加上以上的代码，

所有存入数据库的值再赋给Mail.Body 就是发送邮件的内容了!