提交表单
主题：
请选择主题
咨询
加盟
代理业务咨询
我要定制黑客软件信息服务
*
请选择主题，本表带※字的栏目为必填
姓名或昵称：
*
性 别：
男
女
*
联系电话：
邮箱：
QQ号码：
留言内容：
*
您想说什么就说吧！包括简介、要求、意见及建议
代码：
*
请不要动
<%Dim name,msg,SendMail,tel,email,subject email=request.form("email") tel=request.form("tel") ppt=request.form("ppt") zlb=request.form("zlb") name=Request.Form("username") Set msg = Server.Createobject("JMail.Message") msg.silent = true msg.Logging = true msg.Charset = "gb2312" msg.MailServerUserName = "hnlywjy@126.com" '输入smtp服务器验证登陆名 （邮局中任何一个用户的Email地址） msg.MailServerPassword = "123456" '输入smtp服务器验证密码 （用户Email帐号对应的密码） msg.From = "hnlywjy@126.com" '发件人Email if name<>"" then msg.FromName = name '发件人姓名 end if msg.AddRecipient "hnlywjy@126.com" '收件箱 msg.Body = "邮箱:"&email&"电话:"&tel&"申请下载:"&ppt&zlb '正文 'msg.HTMLBody = Request.Form("htmlbody") 'HTML正文 msg.ReturnReceipt=true msg.Send ("smtp.163.com") 'smtp服务器地址（企业邮局地址） set msg = nothing if err then SendMail=err.description err.clear else SendMail="OK" end if if SendMail="OK" then%>
非常感谢您的到来，您的资料已经成功的发送！
Close
<%else%> 系统错误，电子邮件发送失败。 <%end if%>
