rstjs1.asp

人事管理系统 人事管理系统 人事管理系统 人事管理系统

<%
dim gh1,name1,xb1,sfzh1,rzsj1,xl1,zsh1,zw1,bm1
gh1=request("gh")
name1=request("name")
xb1=request("xb")
sfzh1=request("sfzh")
rzsj1=request("rzsj")
xl1=request("xl")
zsh1=request("zsh")
zw1=request("zw")
bm1=request("bm")



set conn=Server.CreateObject("adodb.connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database/rsxt.mdb") 
set rs=Server.CreateObject("adodb.recordset")
sql="select * from [rsxt]"
rs.open sql,conn,1,3
rs.addnew
rs("gh")=gh1
rs("name")=name1
rs("xb")=xb1
rs("sfzh")=sfzh1

rs("rzsj")=rzsj1
rs("xl")=xl1
rs("zsh")=zsh1
rs("zw")=zw1
rs("bm")=bm1

rs.update
rs.close
set rs=nothing
%>
<!-- #include file="Inc/Head.asp" -->

  &nbsp;员工工号：<%=gh1%><br>
  &nbsp;姓&nbsp;&nbsp;&nbsp;&nbsp;名:<%=name1%><br>
  &nbsp;性&nbsp;&nbsp;&nbsp;&nbsp;别:<%=xb1%><br>
  &nbsp;身份证号:<%=sfzh%><br>
  <br>
  &nbsp;入职时间:<%=rzsj%><br>
  &nbsp;学&nbsp;&nbsp;&nbsp;&nbsp;历:<%=xl1%><br>
  &nbsp;证&nbsp;书&nbsp;号:<%=zsh1%><br>
  &nbsp;入职职位:<%=zw1%><br>
  &nbsp;部&nbsp;&nbsp;&nbsp;&nbsp;门:<%=bm1%><br>
  <br>
<!-- #include file="Inc/foot.asp" -->