用JMAIL如何实现将表单发送到指定邮箱_服务器知识

本地需要安装JMAIL组件 '接收邮件的内容 Guest_title=Trim(request.Form("Guest_title")) Guest_name=Trim(request.Form("Guest_name")) Guest_Email=Trim(request.Form("Guest_Email")) Guest_lxwm=Trim(request.Form("Guest_lxwm")) Guest_qq=Trim(request.Form("Guest_qq")) Guest_add=Trim(request.Form("Guest_add")) Guest_memo=Trim(request.Form("Guest_memo")) dim nei nei="主题："&Guest_title&" "&"姓名："&Guest_name&" "&"电子邮件："&Guest_Email&" "&"联系电话："&Guest_lxwm&" "&"联系ＱＱ："&Guest_qq&" "&"联系地址："&Guest_add&" "&"留言内容："&Guest_memo dim email,title,mtext email=abc@126.com title="邮箱标题" mtext=nei Set msg = Server.CreateObject("JMail.Message") msg.silent = true msg.Logging = true msg.Charset = "gb2312" '邮件文字的代码为简体中文 msg.ContentType = "text/html" '邮件的格式为HTML的 msg.MailServerUserName = abc@126.com '此为您邮箱的登录帐号，使用时请更改为自己的邮箱登录帐号 msg.MailServerPassword = "××××" '此为您邮箱的登录密码，使用时请更改为自己的邮箱登录密码 msg.From = abc@126.com '发件人Email msg.FromName = "enquiry" '发件人姓名 msg.AddRecipient email '收件人Email msg.Subject = title '邮件主题 msg.Body = mtext '邮件正文 msg.Priority = 1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认值 msg.Send ("smtp.qiye.163.com") 'SMTP服务器地址 msg.close() set msg = nothing response.Write "<script language='javascript'>alert('留言成功!')window.location.href='跳转页面'</script>" response.End msg.close() set msg = nothing

参考例子

var personal=Request.Form("personal")//开户人身份，法人或是个人

var company=Request.Form("company")//单位名称

var contacter=Request.Form("contacter")//联系人姓名

var gender=Request.Form("gender")//称呼

var identity=Request.Form("identity")//身份证号码

var tel=Request.Form("tel")//联系电话

var email=Request.Form("email")//电子邮件

var province=Request.Form("province")//所在地区

var city=Request.Form("city")//所在城市

var town=Request.Form("town")//所在县

var purpose=Request.Form("purpose")//涉足期货目的

var experience=Request.Form("experience")//是否有期货经验

var invest=Request.Form("invest")//拟投入资金规模

mail_pape="<html><head><title></title></head><body>开户类型:"+personal+"单位名称:"+company+"联系人姓名:"+contacter+"称呼:"+gender+"身份证号码:"+identity+"联系电话:"+tel+"电子邮箱:"+email+"所在地区:"+province+"所在城市:"+city+"所在县:"+town+"目的:"+purpose+"是否有经验:"+experience+"拟投入资金规模"+invest+"</body></html>"

var mailObj=Server.CreateObject("JMail.Message")

mailObj.Logging=true//本组件发送日志打开

mailObj.Charset="gb2312"//发送邮件的字符编码

mailObj.ContentType="text/html"//发送邮件的格式

mailObj.From="随便@163.com"//发送人所用邮箱

mailObj.FromName="开户资料" //发送人姓名

mailObj.AddRecipient("wangwu@yeah.net","王五")//收件人地址，姓名如果有多个收件人，再添加一行。

mailObj.AddRecipient("wangliu@yeah.net","王六")//加上上面的一行，一共两个收信地址。

mailObj.Subject=contacter+"开户资料"//发送邮件的标题

mailObj.Body=mail_pape//邮件主题内容从mail_page中获取

if(!mailObj.Send("用户名:密码@smtp.163.com"))//邮件发送所用的邮箱的用户名,密码及smtp服务器设置

{

Response.Write("<pre>"+mailObj.log+"</pre>")

}

else

{

//Response.Write("邮件发送成功～！")

}

欢迎分享，转载请注明来源：夏雨云

原文地址:https://www.xiayuyun.com/zonghe/595808.html

用JMAIL如何实现将表单发送到指定邮箱

发表评论

评论列表（0条）