永发信息网

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>&lt;%<br><br>If request(&quot;go&quot;)&lt;&gt;&quot;sent&quot; Then response.End <br><br>dim CLStr,msg,mailserver,username,password,receive<br><br>CLStr=Chr(13) &amp; Chr(10)<br><br>'请在此修改相关信息<br><br>mailserver=&quot;smtp.163.com&quot; '邮局服务器地址(smtp服务器地址)<br><br>username=&quot;18627130892@163.com&quot; 'smtp服务器验证登陆名(用来做为代发邮件的地址,代发邮件的email地址)<br><br>password=&quot;hzwl0769&quot; 'smtp服务器验证密码 (代发邮箱密码)<br><br>receive=&quot;service@js-pass.com&quot; '接受反馈信息的email地址(用来接收邮件的信箱)<br><br>'修改结束<br><br>Set msg = Server.CreateObject(&quot;JMail.Message&quot;)<br><br>msg.Charset = &quot;gb2312&quot;<br><br>msg.logging = true '启用邮件日志<br><br>msg.silent=True'屏蔽例外错误,返回False或True<br><br>'msg.ContentType = &quot;text/html&quot;'邮件的格式为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 = &quot;网站留言主题:&quot;&amp;Request.Form(&quot;subject&quot;)<br><br>msg.HTMLBody = &quot;网站留言&quot;&amp;CLStr&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;公司名称:&quot;&amp;Request.Form(&quot;FaqTitle&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;公司地址:&quot;&amp;Request.Form(&quot;xingbie&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;联络人:&quot;&amp;Request.Form(&quot;Content&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;公司电话:&quot;&amp;Request.Form(&quot;shenfenzheng&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;公司传真:&quot;&amp;Request.Form(&quot;dianhua&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;行动电话:&quot;&amp;Request.Form(&quot;weixin&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;电子邮件:&quot;&amp;Request.Form(&quot;jiezhongriqi&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;br&gt;详细内容:&lt;br&gt;&quot;<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&lt;div style='font:9pt;background-color:#eeeeee'&gt;&quot;&amp;Request.Form(&quot;yimiaozhongleixuanze&quot;)&amp;CLStr<br><br>msg.HTMLBody = msg.HTMLBody&amp;&quot;&quot;<br><br>If msg.Send (mailserver) Then <br><br>Response.Write(&quot; &lt;script language=javascript&gt;alert('发送成功');location='/'&lt;/script&gt;&quot;)<br><br>else<br><br>Response.Write(&quot; &lt;script language=javascript&gt;alert('发送失败,请仔细检查邮件服务器的设置是否正确!') &lt;/script&gt;&quot;)<br><br>End If <br><br>msg.close<br><br>set msg = nothing<br><br>%&gt;
全部回答
  • 1楼网友:纵马山川剑自提
  • 2021-02-07 00:58
不管你是用自动还是手动,都必须要激活一个action才能让服务器知道要准备接受浏览器发来的信息,即使你设置定时器,也需要在时间到达时刻激活action事件才能向服务器发送表单内容。当然不是只有鼠标点击按钮才能作到,只要你的javascript脚本能驱动submit事件的发生即可。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯