📄 send.asp
字号:
<%
sbj=request.form("sbj") '服务类型
name=request.form("name") '姓名
email=request.form("txtemail") 'email
tel=request.form("tel") '电话
addr=request.form("addr") '地址
other=request.form("other") '备注
on error resume next '忽略邮址错误
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.Charset = "gb2312"
JMail.ServerAddress =""
JMail.Priority = 1 '高优先级
JMail.contenttype ="text/html" '格式 默认为text/txt
JMail.Sender = "webmaster@0754b2c.com" '指定发件人的邮件地址
JMail.Subject ="汕头商城服务申请" ' 邮件标题
JMail.SenderName = "汕头商城" '指定发件人的姓名
JMail.ReplyTo = "webmaster@0754b2c.com" '可选的回信地址
JMail.AddRecipientBCC( "webmaster@0754b2c.com" ) '增加密件收件人
JMail.AddRecipient( email ) '收件人
mess = "<body bgcolor=""#FFFFE8"">"
mess = mess &"尊敬的用户[<font color=""#FF0000"">"&name&"</font>]您好!" & "<br>"
mess = mess & "<br>"
mess = mess &" 首先感谢您申请我们的服务。我们已收到你提交的[<font color=""#FF0000"">"&sbj&"</font>]申请记录" & "<br>"
mess = mess & "<br>"
mess = mess &" 我们在确认你的资料后将会有业务员直接与你联系，同时你也可以致电（800-830-9740）与我们业务部直接联系" & "<br>"
mess = mess & "<br>"
mess = mess &"以下为您的申请资料:" & "<br>"
mess = mess &"您所申请的服务类型: "&sbj &"<br>"
mess = mess &"您的姓名: "&name &"<br>"
mess = mess &"您的电话: "&tel &"<br>"
mess = mess &"您的地址: "&addr &"<br>"
mess = mess &"备注: "&other &"<br>"
mess = mess & "<br>"
mess = mess &"<font color=""#FF0000"">汕头商城 www.0754b2c.com</font>" & "<br>"
mess = mess &"" & "<br>"
mess = mess &"电话：800-830-9740" & "<br>"
mess = mess &"联系人：许展鸿" & "<br>"
mess = mess &"E-MAIL：webmaster@0754b2c.com" & "<br>"
mess = mess &"</body>"
JMail.Body = mess '信件体正文为变量mess
if err then '判断是否错误
err.clear
end if
JMail.Execute()
Response.Write ("<script>alert('邮件内容已经发送到指定的邮箱地址了，请确定返回！');window.location.href=""servers.htm""</script>")
set jMail=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -