dw表单信息如何上传到服务器,DW中如何把表单发送到邮箱中?

满意答案

qiaobai8940

2013.03.19

采纳率：56%    等级：11

已帮助：4436人

其实就是一个邮件发送系统 所以只需要下一个组件就可以了 具体细节我还不怎么清楚 代码在下面 你可以分析一下 或者上网去查下相关资料

jmail组件发信

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

00分享举报