大之天儿童版歌曲:在DW中如何让表单提交的信息发到邮箱里

楼主的要求 其实就是一个邮件发送系统 所以只需要下一个组件就可以了 具体细节我还不怎么清楚 代码在下面 你可以分析一下 或者上网去查下相关资料
jmail组件发信
<% 1
set jmail=server.CreateObject("JMAIL.Message") 2
jmail.Logging = true 3
jmail.From="service@mail.com" 4
jmail.ReplyTo="service@mail.com" 5
jmail.AddRecipient "admin@mail.com" 6
jmail.Subject="新用户注册！" 7
jmail.Body="用户注册信息" 8
jmail.MailServerUserName="brookes" 9
jmail.MailServerPassword="pass" 10
jmail.Send( "mail.server.com" ) 11
jmail.Close
set jmail=nothing
%>

Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = request.form("rcpt")
objCDO.From = request.form("mailfrom")
objCDO.Subject = request.form("subject")
objCDO.Body = request.form("data")
objCDO.MailFormat = 0
objCDO.Send