📄 hrmbase_show.asp
字号:
<%
'OA 表单生成器1.0
'功能：查看人事档案基本信息
'参数：request("id")=int #记录ID
%>
<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->
<!--#include file="./Hrm_menu.asp"-->
<%
'response.buffer=false
'------------------------------------------------设置参数
LoginID=trim(Session("LoginID")) : if LoginID="" then LoginID=0 '当前用户ID
bid=cint(request("bid")) '记录ID
'------------------------------------------------
'------------------------------------------------取记录
'取要查看的记录 （返回rs对象）
table="tbioaHrmBase" '表名
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from " & table & " where ID="&bid
rs.open sql,oConn,1,1
'------------------------------------------------
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/main.css" type=text/css>
<title>档案基本信息详细信息</title>
</head>
<body topmargin="10" leftmargin="10">
<%call HrmMenu("档案基本信息")%>
<%if rs.eof then%>
<center>暂无相关信息！</center>
<%response.end
end if%>
<table class="tab" cellSpacing="1" cellPadding="3" width="700" align="center" border="0">
<tbody>
<tr>
<td width=90 nowrap class=td1> 档案编号</td>
<td class="td0"><%=HtmlOut(rs("bh"))%></td>
<td width=100 nowrap class=td1> 录入时间</td>
<td class="td0"><%=HtmlOut(rs("sdate"))%></td>
<td class=td1>录入者</td>
<td class="td0"><a href="../hrm/userdetail.asp?strid=<%=rs("userid")%>"><%=HtmlOut(GetUserName(rs("userid")))%></a></td>
</tr>
<tr>
<td nowrap class=td1> 姓名</td>
<td class="td0"><%=HtmlOut(rs("xm"))%></td>
<td nowrap class=td1> 性别</td>
<td class="td0"><%=HtmlOut(rs("xb"))%></td>
<td class=td1>身份证号</td>
<td class="td0"><%=HtmlOut(rs("sfzh"))%></td>
</tr>
<tr>
<td nowrap class=td1> 出生日期</td>
<td class="td0"><%=HtmlOut(rs("csrq"))%></td>
<td valign="top" nowrap class="td1">籍贯</td>
<td nowrap class="td0"><%=HtmlOut(rs("province")&" "&rs("city"))%></td>
<td valign="top" nowrap class="td1">政治面貌</td>
<td nowrap class="td0"><%=HtmlOut(rs("zzmm"))%></td>
</tr>
<tr>
<td valign="top" nowrap class="td1">入党时间</td>
<td nowrap class="td0"><%=HtmlOut(rs("rdsj"))%></td>
<td valign="top" nowrap class="td1">最高学历</td>
<td nowrap class="td0"><%=HtmlOut(rs("xl"))%></td>
<td valign="top" nowrap class="td1">所学专业</td>
<td nowrap class="td0"><%=HtmlOut(rs("sxzy"))%></td>
</tr>
<tr>
<td valign="top" nowrap class="td1">何时何校毕业</td>
<td nowrap class="td0"><%if rs("hsby")<>"" then%>(<%=HtmlOut(rs("hsby"))%>)<%end if%>
<%if rs("hxby")<>"" then%>毕业于 <%=HtmlOut(rs("hxby"))%><%end if%></td>
<td valign="top" nowrap class="td1">技术职称</td>
<td nowrap colspan="3" class="td0">
<%
'------------------------------------------------取技术职称情况记录
set rszc=Server.CreateObject("ADODB.RecordSet")
sql="select * from tbioaHrmJobZc where bid='" & bid & "' order by ID desc"
rszc.open sql,oConn,1,1
'--------------------------
while not rszc.eof
response.write "("&HtmlOut(rszc("zcxb"))&" "&HtmlOut(rszc("zcjb"))&") "
rszc.movenext
wend
%>
</td>
</tr>
<tr>
<td valign="top" nowrap class="td1">职业资格</td>
<td nowrap class="td0"><%=HtmlOut(rs("zyzg"))%></td>
<td valign="top" nowrap class="td1">授予时间</td>
<td nowrap class="td0"><%=HtmlOut(rs("zcsysj"))%></td>
<td valign="top" nowrap class="td1">授予机关</td>
<td nowrap class="td0"><%=HtmlOut(rs("zcsyjg"))%></td>
</tr>
<tr>
<td valign="top" nowrap class="td1">工种</td>
<td nowrap class="td0"><%=HtmlOut(rs("gz"))%></td>
<td valign="top" nowrap class="td1">婚姻状况</td>
<td nowrap class="td0"><%=HtmlOut(rs("hyzk"))%></td>
<td valign="top" nowrap class="td1">子女状况</td>
<td nowrap class="td0"><%=HtmlOut(rs("znzk"))%></td>
</tr>
<tr>
<td valign="top" nowrap class="td1">子女出生年月</td>
<td nowrap class="td0"><%=HtmlOut(rs("zncsy"))%> 年 <%=HtmlOut(rs("zncsm"))%>
月</td>
<td valign="top" nowrap class="td1">参加工作时间</td>
<td nowrap class="td0"><%=HtmlOut(rs("sccjgzsj"))%></td>
<td valign="top" nowrap class="td1">入职日期</td>
<td nowrap class="td0"><%=HtmlOut(rs("rzdate"))%></td>
</tr>
<tr>
<td valign="top" nowrap class="td1">入职状态</td>
<td nowrap class="td0"><%=HtmlOut(rs("rzzt"))%></td>
<td valign="top" nowrap class="td1">现工作单位</td>
<td nowrap class="td0"><%=HtmlOut(GetTableValue("tbioaDepartment","Name","id",rs("xgzdw")))%></td>
<td valign="top" nowrap class="td1">工作岗位/职务</td>
<td nowrap class="td0"><%=HtmlOut(rs("xgzgw"))%></td>
</tr>
<tr>
<!--td valign="top" nowrap class="td1">现任职务</td>
<td nowrap class="td0"><%=HtmlOut(rs("xrzw"))%></td-->
<td valign="top" nowrap class="td1">是否工会会员</td>
<td nowrap class="td0"><%=HtmlOut(rs("sfghhy"))%></td>
<td valign="top" nowrap class="td1">入会日期</td>
<td nowrap class="td0"><%=HtmlOut(rs("rhrq"))%></td>
<td valign="top" nowrap class="td1">联系电话</td>
<td nowrap class="td0"><%=HtmlOut(rs("bgdh"))%></td>
</tr>
<!--tr>
<td valign="top" nowrap class="td1">办公电话</td>
<td nowrap class="td0"><%=HtmlOut(rs("bgdh"))%></td>
<td valign="top" nowrap class="td1">移动电话</td>
<td nowrap class="td0"><%=HtmlOut(rs("yddh"))%></td>
<td valign="top" nowrap class="td1">住宅电话</td>
<td nowrap class="td0"><%=HtmlOut(rs("zzdh"))%></td>
</tr-->
<tr>
<td colspan="1" nowrap class=td1> 国家执业资格<br>注册证书（类型）</td>
<td colspan="5" class="td0"><%=HtmlOut(rs("zgzs"))%></td>
</tr>
<tr>
<td nowrap class=td1> 备注</td>
<td colspan="5" class="td0"><%=HtmlOut(rs("remark"))%></td>
</tr>
<tr>
<td colspan="6" nowrap class="noprint"></td>
</tr>
</tbody>
</table>
</body>
</html>
<%'释放对象变量
rs.close
oConn.close
%> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -