⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 regdata.asp

📁 免费实用家教网整站程序(奥运特别版) v1.5
💻 ASP
字号:
<!--#include file="info.asp"-->
<!--#include file="conn_reg.asp"-->
<!--#include file="check.asp"-->
<!--#include file="md5.asp"-->

<%
str=request("zpname")
if request("name")="" or request("pwd")="" or (request("user")<>"1" and request("user")<>"2") or request("question")="" or request("answer")=""or request("email")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请确认所有信息已经填写!');" & "history.back()" & "</script>" 
Response.End
end if
if request("email")="@" or instr(request("email"),"@")=0 then
response.write "<script language=JavaScript>" & chr(13) & "alert('邮箱地址不正确!');" & "history.back()" & "</script>" 
Response.End
end if
if request("zpname")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('姓名还没填写!');" & "history.back()" & "</script>" 
Response.End
end if
if request("phone")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('您的联系电话还没填写!');" & "history.back()" & "</script>" 
Response.End
end if
if request("pwd")<>request("pwd1") then
response.write "<script language=JavaScript>" & chr(13) & "alert('两次密码输入不正确!');" & "history.back()" & "</script>" 
Response.End
end if
if instr(request("name"),"'")<>0 then
response.write "<script language=JavaScript>" & chr(13) & "alert('非法数据提交!');" & "history.back()" & "</script>" 
Response.End
end if

if len(request("zpname"))>10then
response.write "<script language=JavaScript>" & chr(13) & "alert('姓名不能超过20个字!');" & "history.back()" & "</script>" 
Response.End
end if
call codeistrue("register_sy.asp")
name=request("name")
email=request("email")
pwd=request("pwd")
question=request("question")
answer=request("answer")
zpname=request("zpname")
phone=request("phone")

content="免费家教网欢迎您!"&"请尽快发布家教信息!"

if request("user")="1" then
byyx=request("byyx")
zy=request("zy")
sex=request("sex")
shenggao=request("shenggao")
gzdd=request("gzdd")
gzcs=request("gzcs")
zye=request("zye")
kmubiao=request("kmubiao")
province=request("province")
city=request("city")
xian=request("xian")

if trim(request("sex"))="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择性别!');" & "history.back()" & "</script>" 
Response.End
end if
if request("shenggao")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('年龄没填写!');" & "history.back()" & "</script>" 
Response.End
end if
if request("gzdd")="0" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择辅导科目!');" & "history.back()" & "</script>" 
Response.End
end if
if trim(request("gzcs"))="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请填写所在年级!');" & "history.back()" & "</script>" 
Response.End
end if
if request("zye")="0" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择辅导方式!');" & "history.back()" & "</script>" 
Response.End
end if
if request("byyx")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('就读学校还没写!');" & "history.back()" & "</script>" 
Response.End
end if
if request("zy")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请填写每小时可支付价格!');" & "history.back()" & "</script>" 
Response.End
end if
if request("province")="0" or request("city")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择省份!如果无法选择城市,请再选择一次对应的省份后操作!');" & "history.back()" & "</script>" 
Response.End
end if
if request("city")="0" or request("city")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择城市!如果无法选择城市,请再选择一次对应的省份后操作!');" & "history.back()" & "</script>" 
Response.End
end if
if trim(request("kmubiao"))="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('简介不能为空!');" & "history.back()" & "</script>" 
Response.End
end if
if len(request("kmubiao"))>200 then
response.write "<script language=JavaScript>" & chr(13) & "alert('简介不能超过200字!');" & "history.back()" & "</script>" 
Response.End
end if
sql="select id from in_user"
rs.open sql,conn,1,1
if rs.recordcount>3000 then 
response.write "<script language=JavaScript>" & chr(13) & "history.back()" & "</script>" 
Response.End
end if
rs.close
sql="select id from in_user where ac='"&name&"'"
rs.open sql,conn,1,1
if rs.recordcount<>0 then
response.write "<script language=JavaScript>" & chr(13) & "alert('此用户名已经被注册!');" & "history.back()" & "</script>" 
Response.End
else
rs.close
sql="insert into in_user(ac,pwd,question,answer,email,name,phone,school,zy,sex,shenggao,gzcs,gzdd,zye,province,city,xian,kmubiao) values('"&name&"','"&md5(pwd)&"','"&question&"','"&md5(answer)&"','"&email&"','"&zpname&"','"&phone&"','"&byyx&"','"&zy&"','"&sex&"','"&shenggao&"','"&gzcs&"','"&gzdd&"','"&zye&"','"&province&"','"&city&"','"&xian&"','"&kmubiao&"')"
rs.open sql,conn,1,1
sql="select id from in_user where ac='"&name&"'"
rs.open sql,conn,1,1
id=rs("id")
rs.close
sql="insert into message(ttype,tid,ftype,content,title) values('1',"&id&",'0','"&content&"','恭喜您成功注册!')"
rs.open sql,conn,1,1
set rs=nothing
set conn=nothing
Response.Cookies("name")=zpname
Response.Cookies("vip")="false"
Response.Cookies("id")=id
Response.Cookies("ac")=name
Response.Cookies("rdate")=now()
Response.Cookies("ggval")="81528686528"
Response.Cookies("user")="1"
Response.Cookies("sjob")=""
Response.Cookies("newinfo")="new"
response.write "<script language=JavaScript>" & chr(13) & "alert('注册学员用户成功!!现进入会员中心...★预祝您成功!★');"&"window.location.href = 'control.asp'"&" </script>"
end if
end if

if request("user")="2" then
trade=request("trade")
cxz=request("cxz")
province=request("province")
city=request("city")
jianj=request("jianj")
xian=request("xian")
if request("trade")="0" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择教员身份!');" & "history.back()" & "</script>" 
Response.End
end if
if request("cxz")="0" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择擅长科目!');" & "history.back()" & "</script>" 
Response.End
end if
if request("jianj")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请填写教员简介!');" & "history.back()" & "</script>" 
Response.End
end if
if request("province")="0" or request("city")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择省份!如果无法选择城市,请再选择一次对应的省份后操作!');" & "history.back()" & "</script>" 
Response.End
end if
if request("city")="0" or request("city")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请选择城市!如果无法选择城市,请再选择一次对应的省份后操作!');" & "history.back()" & "</script>" 
Response.End
end if
if len(request("jianj"))>300 then
response.write "<script language=JavaScript>" & chr(13) & "alert('教员简介不能超过300字!');" & "history.back()" & "</script>" 
Response.End
end if
sql="select id from en_user"
rs.open sql,conn,1,1
if rs.recordcount>3500 then 
response.write "<script language=JavaScript>" & chr(13) & "history.back()" & "</script>" 
Response.End
end if
rs.close
sql="select id from en_user where ac='"&name&"' or phone='"&phone&"'"
rs.open sql,conn,1,1
if rs.recordcount<>0 then
response.write "<script language=JavaScript>" & chr(13) & "alert('此用户名已经被注册或同一教员重复注册!');" & "history.back()" & "</script>" 
Response.End
else
rs.close
sql="insert into en_user(ac,pwd,question,answer,email,phone,name,jianj,province,city,trade,cxz,xian) values('"&name&"','"&md5(pwd)&"','"&question&"','"&md5(answer)&"','"&email&"','"&phone&"','"&zpname&"','"&jianj&"','"&province&"','"&city&"','"&trade&"','"&cxz&"','"&xian&"')"
rs.open sql,conn,1,1
sql="select id from en_user where ac='"&name&"'"
rs.open sql,conn,1,1
id=rs("id")
rs.close
sql="insert into message(ttype,tid,ftype,content,title) values('2',"&id&",'0','"&content&"','恭喜您成功注册!')"
rs.open sql,conn,1,1
set rs=nothing
set conn=nothing
Response.Cookies("name")=zpname
Response.Cookies("vip")="false"
Response.Cookies("id")=id
Response.Cookies("ac")=name
Response.Cookies("rdate")=now()
Response.Cookies("ggval")="81528686528"
Response.Cookies("user")="2"
Response.Cookies("newjob")=""
Response.Cookies("newinfo")="new"
response.write "<script language=JavaScript>" & chr(13) & "alert('教员注册成功!!现进入会员中心...★预祝您成功!★');"&"window.location.href = 'en_control1.asp'"&" </script>"
end if
end if
set rs=nothing
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -