web开发技术

来源：百度知道 编辑：UC知道 时间：2024/05/17 07:26:00
在ASP设计中,当用户提交表单信息给服务器时,要求服务器根据客户提交表单中的电子邮件地址,给该油箱中发送一个类似祝贺的邮件,请问该怎样编写程序代码呢?
前提是该油箱是已经有的,谢谢!

sub mail()
dim mailb,Jmail
mailb="你好,来自"&xx&"的"&xxx&"!<br>恭喜您成为"&xx&">会员！<br>您的帐号："&xxx&"<br>您的密码："&xxx&"<br>
Set Jmail=server.createobject("Jmail.Message")
Jmail.Charset ="gb2312"
Jmail.Silent =true
JMail.ContentType = "text/html"
Jmail.Priority = 3
Jmail.MailServerUserName = mailname
Jmail.MailServerPassword = mailpass
Jmail.From = mailform
Jmail.FromName =""&xxx&"管理员"
Jmail.Subject ="恭喜你注册成功，请管理好你的帐号！"
Jmail.AddRecipient ""&email&""
Jmail.Body = mailbody
Jmail.Send(mailsmtp)
Set Jmail=nothing
end sub
你机子必须安装JMail组件,否则无法实现.