DW里面的留言板按钮怎么关联ASP文件。点击后运行ASP文件把留言信息发送到邮箱
DW里面的留言板按钮怎么关联ASP文件。点击后运行ASP文件把留言信息发送到邮箱,设置了一个HTM文件,里面有表单内容,有按钮(提交)。然后设置了一个ASP文件关联到按钮...
DW里面的留言板按钮怎么关联ASP文件。点击后运行ASP文件把留言信息发送到邮箱,设置了一个HTM文件,里面有表单内容,有按钮(提交)。然后设置了一个ASP文件关联到按钮。可是测试点击无反应。不能把内容发送到制定邮箱。应该是我的代码设置有严重的错误。请大虾门指点。帮帮小弟!
现有个留言框和 做了ASP (填写信息发送到指定的邮箱)
这是留言板的代码
ASP 的代码 下面4-30可以忽略这些数字。
<%@ codepage=65001 %>
<%
dim mailtest,topic,mailto,mailfrom,number,mailbox
mailtest=request("mailtest")
topic=request("topic")
mailto=request("mailto")
mailfrom=request("mailfrom")
number=request("number")
mailbox=request("mailbox")
Set msg = Server.CreateObject("JMail.Message")
msg.Charset = "UTF-8"
msg.ContentType = "text/html"
msg.MailServerUserName = "sunwa01@163.com " '你的发信帐户 (在这里修改)
msg.MailServerPassword = "sun-wapass " '你的发信密码 (在这里修改)
msg.From = " " '发件人Email (接收flash里传来的数据)
msg.FromName = mailfrom '发件人姓名(接收flash里传来的数据)
msg.AddRecipient "george@sun-wa.china.com " '收件人Email(接收flash里传来的数据)
msg.Subject = topic '邮件标题 (接收flash里传来的数据)
msg.Body = mailfrom & "在sun-wa网站留言:<br><br>" & "联系电话:" & number & "<br>" & "邮箱:" & mailbox & "<br>" & "留言内容:" & mailtest '邮件内容(接收flash里传来的数据)
msg.Send ("smtp.163.com") 'SMTP服务器地址(在这里修改)
msg.close()
set msg = nothing
Response.Write "done=1"
%> 展开
现有个留言框和 做了ASP (填写信息发送到指定的邮箱)
这是留言板的代码
ASP 的代码 下面4-30可以忽略这些数字。
<%@ codepage=65001 %>
<%
dim mailtest,topic,mailto,mailfrom,number,mailbox
mailtest=request("mailtest")
topic=request("topic")
mailto=request("mailto")
mailfrom=request("mailfrom")
number=request("number")
mailbox=request("mailbox")
Set msg = Server.CreateObject("JMail.Message")
msg.Charset = "UTF-8"
msg.ContentType = "text/html"
msg.MailServerUserName = "sunwa01@163.com " '你的发信帐户 (在这里修改)
msg.MailServerPassword = "sun-wapass " '你的发信密码 (在这里修改)
msg.From = " " '发件人Email (接收flash里传来的数据)
msg.FromName = mailfrom '发件人姓名(接收flash里传来的数据)
msg.AddRecipient "george@sun-wa.china.com " '收件人Email(接收flash里传来的数据)
msg.Subject = topic '邮件标题 (接收flash里传来的数据)
msg.Body = mailfrom & "在sun-wa网站留言:<br><br>" & "联系电话:" & number & "<br>" & "邮箱:" & mailbox & "<br>" & "留言内容:" & mailtest '邮件内容(接收flash里传来的数据)
msg.Send ("smtp.163.com") 'SMTP服务器地址(在这里修改)
msg.close()
set msg = nothing
Response.Write "done=1"
%> 展开
若以下回答无法解决问题,邀请你更新回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询