<!--#include file="../include/conn.asp" -->
<%
id=session("id")
session("uid")=id
session("uname")=trim(request("username"))
first_subject=trim(request("first_subject"))
second_subject=trim(request("second_subject"))
teach_mode=trim(request("teach_mode"))
work_place=trim(request("work_place"))
low_price=trim(request("low_price"))
response.write first_subject
set rs=server.CreateObject("adodb.recordset")
sql="select * from teacher where t_id="&id
rs.open sql,conn,2,2
email=rs("email")
username=rs("username")
userpwd=rs("userpwd")
rs("first_subject")=first_subject
rs("second_subject")=second_subject
rs("teach_mode")=teach_mode
rs("work_place")=work_place
rs("low_price")=low_price
rs.update
rs.close
set rs=nothing
header1="<font color=red>这是一封你在台州英才家教网的注册通知,详细请看下面:</font>"
''=====发送邮件=====
Set objMail = Server.CreateObject("CDO.Message")
set iConf = Server.CreateObject("CDO.Configuration")
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.tzjiajiao.cn"
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "info@tzjiajiao.cn"
iConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "aaaa"
iConf.Fields.Update
Set objMail.Configuration = iConf
'系统配置结束
'以下为用户自行更改部分,请由程序员进行修改
objMail.From = "info@tzjiajiao.cn"
objMail.Subject = "台州英才家教网会员注册"
'把下面的email改成自己的
objMail.To = email
objMail.HtmlBody=header1
objMail.HtmlBody =objMail.HtmlBody & "<br><br>用户名:"&username
objMail.HtmlBody =objMail.HtmlBody & "<br><br>密码:</font color=blue>"&userpwd&"</font>"
objMail.HtmlBody =objMail.HtmlBody & "<br><br>请保管好你的密码,以便下次能顺利登录你在台州英才家教网的个人管理中心!"
objMail.HtmlBody =objMail.HtmlBody & "<br><br>---------------------------------------"
objMail.HtmlBody =objMail.HtmlBody & "<br><br>联系人:台州英才家教网"
objMail.HtmlBody =objMail.HtmlBody & "<br>公司名称:台州英才家教网"
objMail.HtmlBody =objMail.HtmlBody & "<br>地址:浙江省台州市路桥下里桥西路141号"
objMail.HtmlBody =objMail.HtmlBody & "<br>联系电话:86-576-2410755"
objMail.HtmlBody =objMail.HtmlBody & "<br>传真:86-576-2410755"
objMail.HtmlBody =objMail.HtmlBody & "<br>email:info@tzjiajiao.cn"
objMail.HtmlBody =objMail.HtmlBody & "<br>网址:www.tzjiajiao.cn"
objMail.HtmlBody =objMail.HtmlBody & "<br><br>---------------------------------------"
objMail.Send
Set objMail = Nothing
%>
<meta http-equiv="refresh" content="3;url=main.asp">
<link href="style.css" rel="stylesheet" type="text/css">
<br>
<br>
<br>
<table width="400" height="100" border="2" align="center" cellpadding="0" cellspacing="3" bordercolor="#000000" bgcolor="#FFFFFF">
<tr>
<td height="100" align="center"><table width="100%" border="3" cellpadding="0" cellspacing="0" bordercolor="#000000">
<tr>
<td height="100" align="center" bgcolor="#FFCC00"><table width="98%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25" style="font-size:14px"><div align="center">教员【<%=username%>】注册成功</div></td>
</tr>
<tr>
<td style="font-size:14px"> 我们已经收到你的教员注册请求,我们将尽快审核你提交的资料,并发布到我们网站的教员库>中!!!<br />
你可以进入学员库,查看是否有合适你的学员需求信息,如果有,你可以在线申请并拨打我们的服务热线:0576-2288250,2410755,进一步确认你的条件是否与家长的要求一致。<br />
如果我们确认你的条件与家长的要求相符,请携带你的身份证、学生证或教师资格证等相关证件,登记照片和相关费用在我们指定的时间内前来我们认证中心!我们将现场让你与家长取得联系!<a href='/index.asp'>返回首页</a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
在本地调试,什么问题都没有
放到服务器上就出现:错误 '80040211'