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

📄 jg_reg_save.asp

📁 用C++编写的人事管理系统
💻 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 + -