主题：【求助！】请问谁比较懂网页技术？ -- airman

<%

action=request("action")

if action="ok" then

'==================================================

' 参数设置开始，请修改相应参数

smtpserver = "****" '发送邮件所使用的SMTP服务器，例如smtp.163.com，请修改

smtpuser = "****" '与SMTP服务器对应的邮箱用户名，请修改

smtppwd = "****" '与SMTP服务器对应的邮箱密码，请修改

'如果SMTP服务器需要发信认证，则设置登录SMTP服务器的用户名和密码

'与相应SMTP服务器对应的邮件地址

'注意：很多SMTP服务器除了要验证用户名和密码外，还要验证发件人地

'址，比如163.com的SMTP服务器在检查发信人邮件地址是不是以163.com

'结尾，否则不予发送，因此，使用相应的信箱做为发信人信箱是必要的

smtpemail = "****" 'SMTP服务器发信邮箱，请修改

myemail="****" '用来接收邮件的邮箱，请修改,可以与SMTP服务器发信邮箱不同

' 参数设置结束

'==================================================

sendname = trim(Request("name")) '发件人名字

email = trim(Request("email")) '发件人邮箱

topic = trim(Request("topic"))

if sendname="" or email="" or topic="" then

response.write "请填写每一项!<a href=javascript:history.go(-1)>返回上一页</a>"

response.end

end if

mailbody=mailbody &"<style>A:visited { TEXT-DECORATION: none }"

mailbody=mailbody &"A:active { TEXT-DECORATION: none }"

mailbody=mailbody &"A:hover { TEXT-DECORATION: underline }"

mailbody=mailbody &"A:link { text-decoration: none;}"

mailbody=mailbody &"BODY { FONT-FAMILY: 宋体; FONT-SIZE: 9pt;}"

mailbody=mailbody &"TD { FONT-FAMILY: 宋体; FONT-SIZE: 9pt }</style>"

mailbody=mailbody &"<TABLE border=0 width='95%' align=center><TBODY><TR><TD>"

mailbody=mailbody &"您好!我是"&sendname&"<br><br>"

mailbody=mailbody & "姓名: " & request( "xingming" ) &"<br><br>"

mailbody=mailbody & "性别: " & request( "xingbie" ) &"<br><br>"

mailbody=mailbody & "性别: " & request( "xingbie" ) &"<br><br>"

mailbody=mailbody & "出生年月: " & request( "chusheng" ) &"<br><br>"

mailbody=mailbody & "籍贯: " & request( "jiguan" ) &"<br><br>"

mailbody=mailbody & "民族: " & request( "minzu" ) &"<br><br>"

mailbody=mailbody & "政治面貌: " & request( "zhengzhi" ) &"<br><br>"

mailbody=mailbody & "血型: " & request( "xuexing" ) &"<br><br>"

mailbody=mailbody & "身高: " & request( "shengao" ) &"<br><br>"

mailbody=mailbody & "婚姻状况: " & request( "hunyin" ) &"<br><br>"

mailbody=mailbody & "外语类别: " & request( "waiyu" ) &"<br><br>"

mailbody=mailbody & "外语等级: " & request( "dengji" ) &"<br><br>"

mailbody=mailbody & "计算机等级: " & request( "jisuaji" ) &"<br><br>"

mailbody=mailbody & "职称或专业资格: " & request( "zhicheng" ) &"<br><br>"

mailbody=mailbody & "电话: " & request( "dianhua" ) &"<br><br>"

mailbody=mailbody & "工作年限: " & request( "gongzuo" ) &"<br><br>"

mailbody=mailbody & "求职意向: " & request( "qiuzhi" ) &"<br><br>"

mailbody=mailbody & "教育经历-毕业院校: " & request( "yuanxiao" ) &"<br><br>"

mailbody=mailbody & "教育经历-学历: " & request( "xueli" ) &"<br><br>"

mailbody=mailbody & "教育经历-所学专业: " & request( "zhuanye" ) &"<br><br>"

mailbody=mailbody & "教育经历-学位: " & request( "xuewei" ) &"<br><br>"

mailbody=mailbody & "教育经历-起止时间: " & request( "shijian0" ) &"<br><br>"

mailbody=mailbody & "工作经历-工作单位: " & request( "danwei" ) &"<br><br>"

mailbody=mailbody & "工作经历-时间: " & request( "shijian1" ) &"<br><br>"

mailbody=mailbody & "工作经历-部门及职务: " & request( "bumen" ) &"<br><br>"

mailbody=mailbody & "工作经历-异动原因: " & request( "yidong" ) &"<br><br>"

mailbody=mailbody & "个人档案存放地址: " & request( "dangan" ) &"<br><br>"

mailbody=mailbody & "技能培训情况-培训内容: " & request( "peixunneirong" ) &"<br><br>"

mailbody=mailbody & "技能培训情况-单位和讲师: " & request( "peixundanwei" ) &"<br><br>"

mailbody=mailbody & "技能培训情况-时间: " & request( "shijian2" ) &"<br><br>"

mailbody=mailbody & "行业工作经验: " & request( "hangye" ) &"<br><br>"

mailbody=mailbody & "主要工作成绩/奖罚: " & request( "chengji" ) &"<br><br>"

mailbody=mailbody & "自我评价: " & request( "pingjia" ) &"<br><br>"

mailbody=mailbody & "你对未来发展的想法与规则: " & request( "weilai" ) &"<br><br>"

mailbody=mailbody & "目前薪酬: " & request( "muqian" ) &"<br><br>"

mailbody=mailbody & "期望薪酬: " & request( "qiwang" ) &"<br><br>"

mailbody=mailbody &"*************************************************************************************"

mailbody=mailbody &"<br>此邮件是 小新技术网www.xker.com--新水年华QQ:12231446 制作在线邮件系统发送，请勿直接回复此邮件！<br>"

mailbody=mailbody &"该邮件的发件人为"&sendname&"&nbsp;&nbsp;发件人邮箱为"&email&"<br>"

mailbody=mailbody &"如果需要回复，请发邮件至"&email&"，切记！本站对邮件的内容不负任何法律责任！<br>"

mailbody=mailbody &"*************************************************************************************"

mailbody=mailbody &"</TD></TR></TBODY></TABLE>"

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