asp留言系统中如何使用服务器的功能把留言的表单内容也发送到qq邮箱。
答案:2 悬赏:30 手机版
解决时间 2021-02-07 17:18
- 提问者网友:相思似海深
- 2021-02-06 23:50
具体这样理解,我已经有了留言本的前台后台以及表达格式,平常留言都是存入数据库后台可查看,但我想在表单提交的时候实现存入数据库,同时能收到一个qq邮件 。麻烦给个代码的事例 。谢谢 !
最佳答案
- 五星知识达人网友:举杯邀酒敬孤独
- 2021-02-07 00:08
只能存一个地方 要么提交到数据库 要么提交到邮箱<br>比较点击一次提交一次<br>一次一个位置<br>这个叫JMail 可以搜索一下asp JMail<br><br>代码如下<br><%<br><br>If request("go")<>"sent" Then response.End <br><br>dim CLStr,msg,mailserver,username,password,receive<br><br>CLStr=Chr(13) & Chr(10)<br><br>'请在此修改相关信息<br><br>mailserver="smtp.163.com" '邮局服务器地址(smtp服务器地址)<br><br>username="18627130892@163.com" 'smtp服务器验证登陆名(用来做为代发邮件的地址,代发邮件的email地址)<br><br>password="hzwl0769" 'smtp服务器验证密码 (代发邮箱密码)<br><br>receive="service@js-pass.com" '接受反馈信息的email地址(用来接收邮件的信箱)<br><br>'修改结束<br><br>Set msg = Server.CreateObject("JMail.Message")<br><br>msg.Charset = "gb2312"<br><br>msg.logging = true '启用邮件日志<br><br>msg.silent=True'屏蔽例外错误,返回False或True<br><br>'msg.ContentType = "text/html"'邮件的格式为HTML格式<br><br>msg.Priority = 1 '邮件等级,1为加急,3为普通,5为低级<br><br>msg.MailServerUserName = username<br><br>msg.MailServerPassword = password <br><br>msg.From = username <br><br>msg.FromName = username<br><br>msg.AddRecipient (receive)<br><br>msg.Subject = "网站留言主题:"&Request.Form("subject")<br><br>msg.HTMLBody = "网站留言"&CLStr&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>公司名称:"&Request.Form("FaqTitle")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>公司地址:"&Request.Form("xingbie")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>联络人:"&Request.Form("Content")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>公司电话:"&Request.Form("shenfenzheng")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>公司传真:"&Request.Form("dianhua")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>行动电话:"&Request.Form("weixin")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>电子邮件:"&Request.Form("jiezhongriqi")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&"<br>详细内容:<br>"<br><br>msg.HTMLBody = msg.HTMLBody&"<div style='font:9pt;background-color:#eeeeee'>"&Request.Form("yimiaozhongleixuanze")&CLStr<br><br>msg.HTMLBody = msg.HTMLBody&""<br><br>If msg.Send (mailserver) Then <br><br>Response.Write(" <script language=javascript>alert('发送成功');location='/'</script>")<br><br>else<br><br>Response.Write(" <script language=javascript>alert('发送失败,请仔细检查邮件服务器的设置是否正确!') </script>")<br><br>End If <br><br>msg.close<br><br>set msg = nothing<br><br>%>
全部回答
- 1楼网友:纵马山川剑自提
- 2021-02-07 00:58
不管你是用自动还是手动,都必须要激活一个action才能让服务器知道要准备接受浏览器发来的信息,即使你设置定时器,也需要在时间到达时刻激活action事件才能向服务器发送表单内容。当然不是只有鼠标点击按钮才能作到,只要你的javascript脚本能驱动submit事件的发生即可。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯