<%@ Language = VBScript %> <% action=request("action") if action="ok" then '================================================== ' SHEZHI smtpserver = "smtp.163.com" 'smtp.163.com smtpuser = "jvyiadmin" 'SMTP smtppwd = "790430" 'SMTP 'SMTP 'SMTP 'SMTP '163.com '163.com smtpemail = "jvyiadmin@163.com" 'SMTP myemail="k8905656@163.com" ' ' shezhi '================================================== sendname = trim(Request("name")) 'NAME email = trim(Request("email")) 'SHOUJIERNE body = trim(Request("body")) sex = trim(Request("sex")) nianling= trim(Request("nianling")) zhiye = trim(Request("zhiye")) tel= trim(Request("tel")) add= trim(Request("add")) if sendname="" or email="" or tel="" or body="" then response.write "请填写每一项!返回上一页" response.end end if mailbody=mailbody &"" mailbody=mailbody &"
" mailbody=mailbody &"姓 名:"&sendname&"

" mailbody=mailbody &"性 别:"&sex&"

" mailbody=mailbody &"年 龄:"&nianling&"

" mailbody=mailbody &"职 业:"&zhiye&"

" mailbody=mailbody &"电 话:"&tel&"

" mailbody=mailbody &"E - mail:"&email&"

" mailbody=mailbody &"地 址:"&add&"

" mailbody=mailbody &"详细病情:"&body&"

" mailbody=mailbody &"*************************************************************************************" mailbody=mailbody &"
在线邮件系统发送,请勿直接回复此邮件!
" mailbody=mailbody &"该邮件的发件人为"&sendname&"  发件人邮箱为"&email&"
" mailbody=mailbody &"如果需要回复,请发邮件至"&email&",切记!本站对邮件的内容不负任何法律责任!
" mailbody=mailbody &"*************************************************************************************" mailbody=mailbody &"
" if sendname <> "" and email <> "" then set jmail= server.CreateObject ("jmail.message") jmail.Silent = true jmail.Charset = "gb2312" JMail.ContentType = "text/html" jmail.From = smtpemail jmail.FromName = sendname jmail.ReplyTo = email jmail.Subject = topic jmail.AddRecipient myemail jmail.Body = mailbody 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 end if %>
 
_
 
 
 
联系电话:0471-8905656
电子邮箱:k8905656@163.com
点击这里给我发消息
邮政编码:010020
邮寄地址:内蒙古自治区呼和浩特市第一医院男科
联系人 : 韩树杰

 

点击这里给我发消息