<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> 在线留言
你的姓名:
联系方式:
详细内容:
<% Response.Write(Trim(Request.QueryString("xingming"))) %> <% Response.Write(Trim(Request.QueryString("lianxifangshi"))) %> <% Response.Write(Trim(Request.QueryString("liuyanbiaoti"))) %> <% Response.Write(Trim(Request.QueryString("liuyanzhuti"))) %> <% Response.Write(Trim(Request.QueryString("xiangxineirong"))) %> <%Email = "wxyspakl@163.com" ''收件人Email Set jmail = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象 jmail.silent = false '屏蔽例外错误,返回FALSE跟TRUE两值 jmail.logging = true '启用邮件日志 jmail.Charset = "GB2312" '邮件的文字编码为国标 jmail.ContentType = "text/html" '邮件的格式为HTML格式 jmail.AddRecipient Email '邮件收件人的地址 jmail.From = "uuu521521@163.com" '发件人的E-MAIL地址 jmail.MailServerUserName = "uuu521521@163.com" '登录邮件服务器所需的用户名 jmail.MailServerPassword = "uuu521521521" '登录邮件服务器所需的密码 jmail.Subject = Request.Form("liuyanzhuti") '邮件的标题 jmail.Body = Request.Form("xiangxineirong") '邮件的内容 jmail.Priority = 1 '邮件的紧急程序,1 为最快,5 为最慢, 3 为默认值 jmail.Send("SMTP.163.com") '执行邮件发送(通过邮件服务器地址)。请修改成你的邮件服务器SMTP地址 jmail.Close() '关闭对象%>
Powered by CloudDream