老丁第一家之悦来旅馆

如果您对老丁第一家之悦来旅馆的住宿、餐饮、服务、及网站建设、或其他方面有任何想法及建议，请告知我们。欢迎提出宝贵意见和建议。

<%@ Language=VBScript %> <% '================================================== ' 参数设置 '================================================== '收信人电子邮件地址 '表单里的内容将发送到这个信箱中 myemail ="along0628@163.com" '收信人姓名 myname ="百姓街里街里街坊" '所使用的SMTP服务器 smtpserver ="smtp.163.com" '如果SMTP服务器需要发信认证，则设置登录SMTP服务器的用户名和密码 smtpuser ="along0628" smtppwd ="zhao76" '与相应SMTP服务器对应的邮件地址 '注意：很多SMTP服务器除了要验证用户名和密码外，还要验证发件人地 '址，比如163.net的SMTP服务器在检查发信人邮件地址是不是以163.net '结尾，否则不予发送，因此，使用相应的信箱做为发信人信箱是必要的 smtpemail ="along0628@163.com" '================================================== ' 程序开始 '================================================== tname =Request("T1") temail =Request("T2") tother =Request("T3") tsubject =Request("T4") tbody =Request("T5") if tname <> "" and temail <> "" then set jmail=server.CreateObject ("jmail.message") jmail.Silent =true jmail.Charset ="gb2312" if smtpemail <> "" then jmail.From ="along0628@163.com" else jmail.From =temail end if jmail.FromName =tname jmail.ReplyTo =temail jmail.Subject ="网上提交：" & tsubject jmail.AddRecipient myemail,myname jmail.Body =tbody & vbcrlf & vbcrlf & "其他联系方式：" & tother & vbcrlf & tname jmail.MailServerUserName =smtpuser jmail.MailServerPassWord =smtppwd isgo=jmail.Send(smtpserver) if isgo then msg="提交成功！谢谢你的支持。" else msg="发送失败！请检查您的邮件地址是否填写正确。" end if jmail.Close set jmail=nothing end if %> 第一主机

老丁家	苟各庄·百里峡
老丁第一家之悦来旅馆