📄 jg_reg_save.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!--#include file="qyschar.asp" -->
<%
login=trim(request("login"))
if login="" then
response.Write "<script language=javascript>{window.alert('报错:此处的“登录名”是为以后该教工登录系统修改自己的记录用的,不能为空,在没有同名教工的情况下,您也可以填写教工姓名作为登录名,!');window.history.go(-1);}</script>"
response.End()
end if
set jgrs=server.createobject("adodb.recordset")
sql="select login from jg where login='"&login&"'"
jgrs.open sql,conn,1,2
if not jgrs.eof then
set jgrs=nothing
response.Write "<script language=JavaScript>{window.alert('报错:已经有同一登录名“ "&login&" ”存在,不能重复添加!');window.history.go(-1);}</script>"
response.End()
end if
set jgrs=nothing
pwd=request("pwd")
pwd2=request("pwd2")
if pwd=""and pwd2="" then
response.Write "<script language=JavaScript>{window.alert('报错:您的密码不能为空!');window.history.go(-1);}</script>"
response.End()
end if
if pwd<>pwd2 then
response.Write "<script language=JavaScript>{window.alert('报错:您的密码与确认密码不一致!');window.history.go(-1);}</script>"
response.End()
end if
if len(pwd)<6 or len(pwd)>20 then
response.Write "<script language=JavaScript>{window.alert('报错:您的密码长度不够,至少要输入六位,最长不超过20位!');window.history.go(-1);}</script>"
response.End()
end if
pwd=oyfqm(pwd)
name=trim(request("name"))
if name<>"" then
set rsname=server.createobject("adodb.recordset")
sql="select login from jg where name='"&name&"'"
rsname.open sql,conn,1,2
if not rsname.eof then
flagname=1
set rsname=nothing
end if
end if
if name="" then
response.Write "<script language=javascript>{window.alert('报错:您没有输入教工的真实姓名!');window.history.go(-1);}</script>"
response.End()
end if
sex=request("sex")
mingzu=request("mingzu")
byear=request("byear")
bmonth=request("bmonth")
bday=request("bday")
if byear="" or bmonth="" or bday=""then
response.Write "<script language=javascript>{window.alert('报错:“出生日期”没填或填入的不够完整,请填好出生日期的年月日”!');window.history.go(-1);}</script>"
response.End
end if
birthday=byear&"-"&bmonth&"-"&bday
'age=request("")
shenfenzheng=request("shenfenzheng")
jiguan=request("jiguan")
mianmao=request("mianmao")
rdy=request("rdy")
rdm=request("rdm")
rdd=request("rdd")
mianmaotime=rdy&"-"&rdm&"-"&rdd
gzy=request("gzy")
gzm=request("gzm")
gzd=request("gzd")
workstart=gzy&"-"&gzm&"-"&gzd
'workage=request("workage")
leibie=request("leibie")
xueke=request("xueke")
zhuanye=request("zhuanye")
firstxueli=request("firstxueli")
firstxlgradufrom=request("firstxlgradufrom")
xue1datey=request("xue1datey")
xue1datem=request("xue1datem")
xue1dated=request("xue1dated")
firstxuelidate=xue1datey&"-"&xue1datem&"-"&xue1dated
lastxueli=request("lastxueli")
lastxlgradufrom=request("lastxlgradufrom")
xue2datey=request("xue2datey")
xue2datem=request("xue2datem")
xue2dated=request("xue2dated")
lastxldate=xue2datey&"-"&xue2datem&"-"&xue2dated
zhicheng=request("zhicheng")
zcy=request("zcy")
zcm=request("zcm")
zcd=request("zcd")
zhichengdate=zcy&"-"&zcm&"-"&zcd
spy=request("spy")
spm=request("spm")
spd=request("spd")
zhichpingyongdate=spy&"-"&spm&"-"&spd
renshidaili=request("renshidaili")
phone=request("phone")
beizhu=request("beizhu")
'lurudate=request("lurudate")
renjiaobumen=request("renjiaobumen")
zhiwu=request("zhiwu")
bianzhi=request("bianzhi")
bianzhileibie=request("bianzhileibie")
jianli=request("jianli")
zhuzhi=request("zhuzhi")
hunyin=request("hunyin")
chengyuan=request("chengyuan")
email=request("email")
shehui=request("shehui")
chushen=request("chushen")
lunwen=request("lunwen")
peixunjl=request("peixunjl")
jixujiaoyu=request("jixujiaoyu")
gongzu=request("gongzu")
yibao=request("yibao")
niankao=request("niankao")
biandong=request("biandong")
jiangcheng=request("jiangcheng")
tuxiu=request("tuxiu")
danganhao=request("danganhao")
teacherzheng=request("teacherzheng")
danwei=request("danwei")
img=request("img")
'byear=request("byear")
'bmonth=request("bmonth")
'bday=request("bday")
set rssys=server.createobject("adodb.recordset")
sql="select * from adminsys"
rssys.open sql,conn
if rssys("checkjgreg")="1" then
checkjgreg="1"
isupdate="是"
else
checkjgreg="0"
isupdate="否"
end if
sql="select * from jg"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,2
rs.addnew
rs("login")=login
rs("pwd")=pwd
rs("ischeck")=checkjgreg
rs("isupdate")=isupdate
rs("name")=name
rs("sex")=sex
rs("mingzu")=mingzu
rs("birthday")=birthday
'rs("age")=
rs("shenfenzheng")=shenfenzheng
rs("jiguan")=jiguan
rs("mianmao")=mianmao
rs("mianmaotime")=mianmaotime
rs("workstart")=workstart
' rs("workage")=workage
rs("leibie")=leibie
rs("xueke")=xueke
rs("zhuanye")=zhuanye
rs("firstxueli")=firstxueli
rs("firstxlgradufrom")=firstxlgradufrom
rs("firstxuelidate")=firstxuelidate
if lastxueli=""then
lastxueli=firstxueli
lastxlgradufrom=firstxlgradufrom
lastxldate=firstxuelidate
end if
rs("lastxueli")=lastxueli
rs("lastxlgradufrom")=lastxlgradufrom
rs("lastxldate")=lastxldate
rs("zhicheng")=zhicheng
rs("zhichengdate")=zhichengdate
rs("zhichpingyongdate")=zhichpingyongdate
rs("renshidaili")=renshidaili
rs("phone")=phone
beizhu2 = Replace(beizhu,chr(13),"<br>")
rs("beizhu")=beizhu2
rs("renjiaobumen")=renjiaobumen
rs("zhiwu")=zhiwu
rs("bianzhi")=bianzhi
rs("bianzhileibie")=bianzhileibie
jianli2 = Replace(jianli,chr(13),"<br>")
rs("jianli")=jianli2
rs("zhuzhi")=zhuzhi
rs("hunyin")=hunyin
rs("chengyuan")=chengyuan
rs("email")=email
rs("shehui")=shehui
rs("chushen")=chushen
lunwen2 = Replace(lunwen,chr(13),"<br>")
rs("lunwen")=lunwen2
peixunjl2 = Replace(peixunjl,chr(13),"<br>")
rs("peixunjl")=peixunjl2
jixujiaoyu2 = Replace(jixujiaoyu,chr(13),"<br>")
rs("jixujiaoyu")=jixujiaoyu2
gongzu2 = Replace(gongzu,chr(13),"<br>")
rs("gongzu")=gongzu2
rs("yibao")=yibao
niankao2 = Replace(niankao,chr(13),"<br>")
rs("niankao")=niankao2
rs("biandong")=biandong
jiangcheng2 = Replace(jiangcheng,chr(13),"<br>")
rs("jiangcheng")=jiangcheng2
rs("tuxiu")=tuxiu
rs("danganhao")=danganhao
rs("teacherzheng")=teacherzheng
rs("danwei")=danwei
rs("img")=img
rs("luruuser")=login
rs("luruname")=name
ip11 = Request.ServerVariables("HTTP_X_FORWARDED_FOR") ' 代理IP
ip22 =Request.ServerVariables("REMOTE_ADDR")
if ip11 = "" then
luruip = ip22
else
luruip = ip11
end if
rs("luruip")=luruip
rs("lurudate")=now
rs.update
session("jg_id")=login
set rsadminsys=server.createobject("adodb.recordset")
sqladminsys="select * from adminsys"
rsadminsys.open sqladminsys,conn
if flagname=1 then
if rsadminsys("checkjgreg")="1" then
response.Write "<script language=JavaScript>{window.alert('**恭喜您注册成功! ** 提示:但已经有同一教工的“真实姓名: "&name&" ”存在,如果“真实姓名”无误,在没有“重名教工”的情况下,那么说明您的记录是已经由管理员录入该教工,或被别的教工以你的“姓名”恶意注册!!那么请按“确定”返回后联系管理员删除您刚才输入的记录或原来存在资料库中与您同名的记录!! 您的资料还未通过管理员的审核,所以暂时不能做为正式教工的资料存入学校数据库!请联系管理员通过您的审核!或再等待...在管理员审核通过之前,您还可以随时修改自己的资料,');window.location.href='teacher_reg_redir.asp';}</script>"
else
response.Write "<script language=JavaScript>{window.alert('**恭喜您注册成功! ** 提示:但已经有同一教工的“真实姓名: "&name&" ”存在,如果“真实姓名”无误,在没有“重名教工”的情况下,那么说明您的记录是已经由管理员录入该教工,或被别的教工以你的“姓名”恶意注册,那么请按“确定”返回后联系管理员删除您刚才输入的记录或原来存在资料库中与您同名的记录!');window.location.href='teacher_reg_redir.asp';}</script>"
end if
else if rsadminsys("checkjgreg")="1" then
response.Write "<script language=javascript>{window.alert('恭喜您注册成功! 但是您的资料还未通过管理员的审核,所以暂时不能做为正式教工的资料存入学校数据库!请联系管理员通过您的审核!或再等待...,在管理员审核通过之前,您还可以随时修改自己的资料,请点击“确定”返回您刚才注册的资料!');window.location.href='teacher_reg_redir.asp';}</script>"
else
response.Write "<script language=javascript>{window.alert('恭喜您注册成功!请点击“确定”返回您刚才注册的资料!');window.location.href='teacher_reg_redir.asp';}</script>"
end if
end if
rsadminsys.close
set rsadminsys=nothing
rssys.close
set rssys=nothing
rs.close
set rs=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -