jg_update_s.asp

这个系统是企业管理系统

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Check_Sql123.asp" -->
<!--#include file="jm5.asp" -->

<%Server.ScriptTimeOut=6000%>
<!--#include file="admin_qx.asp" -->
<% call isqx_upd_jb() %> 
<!--#include file="conn_db123.asp" -->
<%

 response.write "<br><br><br><br>"&"　　　　　　　　　　　　　             正在保存信息，请稍候...... "
rcid=request("rcid")

'*************************************************************************
xingming=trim(request("xingming"))
xingbie=trim(request("xingbie"))
chushengsj=trim(request("chushengsj"))
jiguan=trim(request("jiguan"))
minzu=trim(request("minzu"))
zhengzhimianmao=trim(request("zhengzhimianmao"))
zhengzhimianmaosj=trim(request("zhengzhimianmaosj"))
canjiagongzuosj=trim(request("canjiagongzuosj"))
congjiaosj=trim(request("congjiaosj"))
hunyinzhuangkuang=trim(request("hunyinzhuangkuang"))
jinxiaosj=trim(request("jinxiaosj"))

xueli1=trim(request("xueli1"))
xueliqudefangshi1=trim(request("xueliqudefangshi1"))
xuelixuezhi1=trim(request("xuelixuezhi1"))
xuewei1=trim(request("xuewei1"))
xuelisj1=trim(request("xuelisj1"))
xuelixuexiao1=trim(request("xuelixuexiao1"))
xuelizhuanye1=trim(request("xuelizhuanye1"))
xueli2=trim(request("xueli2"))
xueliqudefangshi2=trim(request("xueliqudefangshi2"))
xuelixuezhi2=trim(request("xuelixuezhi2"))
xuewei2=trim(request("xuewei2"))
xuelisj2=trim(request("xuelisj2"))
xuelixuexiao2=trim(request("xuelixuexiao2"))
xuelizhuanye2=trim(request("xuelizhuanye2"))

zhicheng=trim(request("zhicheng"))
zhichengsj=trim(request("zhichengsj"))
zhicheng_xianpin=trim(request("zhicheng_xianpin"))
zhicheng_xianpinsj=trim(request("zhicheng_xianpinsj"))
jinxiaoqiandanwei=trim(request("jinxiaoqiandanwei"))
bianzhileibie=trim(request("bianzhileibie"))
lizhisj=trim(request("lizhisj"))
lizhiyuanyin=trim(request("lizhiyuanyin"))
renshidaili=trim(request("renshidaili"))
jiaoshizhenghao=trim(request("jiaoshizhenghao"))

shenfenzhenghao=trim(request("shenfenzhenghao"))
xingzhengzhiwu=trim(request("xingzhengzhiwu"))
hukousuozaidi=trim(request("hukousuozaidi"))
jiatingzhuzhi=trim(request("jiatingzhuzhi"))
shoujihaoma=trim(request("shoujihaoma"))
youbian=trim(request("youbian"))
zhuzhaidianhua=trim(request("zhuzhaidianhua"))
email=trim(request("email"))
zaizhizhuangtai=trim(request("zaizhizhuangtai"))
zhiyeshengya=trim(request("zhiyeshengya"))
remark=trim(request("remark"))
zhaopian=trim(request("zhaopian"))
bumen=trim(request("bumen"))
xueke=trim(request("xueke"))
bianzhi=trim(request("bianzhi"))
login123=trim(request("login123"))
pwd123=trim(request("pwd123"))
pwd1232=trim(request("pwd1232"))

 if pwd123<>pwd1232 then
	  response.Write "<script language=javascript>{window.alert('报错：两次输入的密码不相同!');window.history.go(-1);}</script>"
	  response.end
end if

if xingming="" then
 response.write "<script language=JavaScript>{window.alert('提示：请输入姓名! \n  请按“确定”返回!  \n ');window.history.go(-1);}</script>"
 response.end
end if
if xingbie="" then
 response.write "<script language=JavaScript>{window.alert('提示：请输入性别! \n  请按“确定”返回!  \n ');window.history.go(-1);}</script>"
 response.end
end if
if chushengsj="" then
 response.write "<script language=JavaScript>{window.alert('提示：请输入出生日期! \n  请按“确定”返回!  \n ');window.history.go(-1);}</script>"
 response.end
end if

if shenfenzhenghao<>""then
if not isnumeric(shenfenzhenghao) then
 response.write "<script language=JavaScript>{window.alert('提示： 身份证号码必须为数字! \n  请按“确定”返回!  \n ');window.history.go(-1);}</script>"
 response.end
 end if
 if  len(shenfenzhenghao)<>15 and len(shenfenzhenghao)<>18 then
 response.write "<script language=JavaScript>{window.alert('提示： 身份证号码必须为15位或18位的数字! \n  请按“确定”返回!  \n ');window.history.go(-1);}</script>"
 response.end
 end if
 end if
 
 
 if login123<>"" then
sqlbianhao="select id from mainjg where login123 ='"&login123&"' and id<>"&rcid&""
set rsbianhao=server.CreateObject("adodb.recordset")
rsbianhao.open sqlbianhao,conn,1,2
if not rsbianhao.eof then
response.Write "<script language=javascript>{window.alert('报错：用户名 "&login123&"重复！');window.history.go(-1);}</script>"
response.end
end if
rsbianhao.close
set rsbianhao=nothing
end if

 
 
sql="select * from mainjg where id="&rcid
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,2
'rs("login123")=login123
if pwd123<>""then rs("pwd123")=MD5(pwd123)
rs("xingming")=xingming
rs("xingbie")=xingbie
rs("chushengsj")=chushengsj
rs("jiguan")=jiguan
rs("minzu")=minzu
rs("zhengzhimianmao")=zhengzhimianmao
rs("zhengzhimianmaosj")=zhengzhimianmaosj
rs("canjiagongzuosj")=canjiagongzuosj
rs("congjiaosj")=congjiaosj
rs("hunyinzhuangkuang")=hunyinzhuangkuang
rs("jinxiaosj")=jinxiaosj

'---------------------------
rs("xueli1")=xueli1
rs("xueliqudefangshi1")=xueliqudefangshi1
rs("xuelixuezhi1")=xuelixuezhi1
rs("xuewei1")=xuewei1
rs("xuelisj1")=xuelisj1
rs("xuelixuexiao1")=xuelixuexiao1
rs("xuelizhuanye1")=xuelizhuanye1
if xueli2="" then
xueli2=xueli1
xueliqudefangshi2=xueliqudefangshi1
xuelixuezhi2=xuelixuezhi1
xuewei2=xuewei1
xuelisj2=xuelisj1
xuelixuexiao2=xuelixuexiao1
xuelizhuanye2=xuelizhuanye1
end if
rs("xueli2")=xueli2
rs("xueliqudefangshi2")=xueliqudefangshi2
rs("xuelixuezhi2")=xuelixuezhi2
rs("xuewei2")=xuewei2
rs("xuelisj2")=xuelisj2
rs("xuelixuexiao2")=xuelixuexiao2
rs("xuelizhuanye2")=xuelizhuanye2

rs("zhicheng")=zhicheng
rs("zhichengsj")=zhichengsj
rs("zhicheng_xianpin")=zhicheng_xianpin
rs("zhicheng_xianpinsj")=zhicheng_xianpinsj
rs("jinxiaoqiandanwei")=jinxiaoqiandanwei
rs("bianzhileibie")=bianzhileibie
rs("lizhisj")=lizhisj
rs("lizhiyuanyin")=lizhiyuanyin
rs("renshidaili")=renshidaili
rs("jiaoshizhenghao")=jiaoshizhenghao
'---------------------------
rs("shenfenzhenghao")=shenfenzhenghao
rs("xingzhengzhiwu")=xingzhengzhiwu
rs("hukousuozaidi")=hukousuozaidi
rs("jiatingzhuzhi")=jiatingzhuzhi
rs("shoujihaoma")=shoujihaoma
rs("youbian")=youbian
rs("zhuzhaidianhua")=zhuzhaidianhua
rs("email")=email
rs("zaizhizhuangtai")=zaizhizhuangtai
rs("zhiyeshengya")=zhiyeshengya
rs("remark")=htmlencode(remark)
rs("zhaopian")=zhaopian
rs("bumen")=bumen
rs("xueke")=xueke
rs("bianzhi")=bianzhi

rs("lastupdname")=session("admin_name")
rs("lastupddate")=now

rs.update

 id_px=rs("id")   
xingming_px=rs("xingming")

'-----------------------***************
	  ip111 = Request.ServerVariables("HTTP_X_FORWARDED_FOR") '　代理IP
ip222 =Request.ServerVariables("REMOTE_ADDR") 
if ip111 = "" then
ipupdate = ip222
else
ipupdate = ip111
end if
jgpcname=Request.ServerVariables("HTTP_USER_AGENT")
sql_jgupddiary="select * from diary_updjg"
set rs_jgupddiary=server.CreateObject("adodb.recordset")
rs_jgupddiary.open sql_jgupddiary,conn,1,2
rs_jgupddiary.addnew
     rs_jgupddiary("id")=rcid '教工ID号
	   rs_jgupddiary("jg_name")=xingming '教工姓名
      rs_jgupddiary("lastupduser")=session("admin_login")
      rs_jgupddiary("lastupdname")=session("admin_name")
	  rs_jgupddiary("danwei")=session("admin_danwei")
      rs_jgupddiary("lastupddate")=now
      rs_jgupddiary("lastupdip")=ipupdate
	 ' rs_jgupddiary("os")=jgpcname
      rs_jgupddiary.update
	  rs_jgupddiary.close
	  set rs_jgupddiary=nothing
	  '------------------------------******************** 

  rs.close
 set rs=nothing
 
 
 response.write "<script language=JavaScript>{window.alert('修改成功! \n\n 注：您使用的是免费版 ，只能修改基本资料,\n\n而学习经历、工作经历、教研情况、奖惩、家庭成员五个模块被禁止新增、修改与删除\n\n 要开通所有模块的修改功能，请注册 ！轻燕工作室的发展离不开您的支持\n\n 请按“确定”返回!  ');location.href='"&session("upd_REFERER")&"';}</script>"
function htmlencode(str)
htmlencode=replace(str,chr(13),"<br>")
end function
%>