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

📄 func_userinfo.asp

📁 企业办公简单管理系统,可以发布信息以及论坛
💻 ASP
字号:

<!-- #include file="func_verify.asp" -->
<%

set rs = Server.CreateObject("ADODB.Recordset")
set rsata = Server.CreateObject("ADODB.Recordset")

sql="select * from cci_oa_emreg where id="& request("id")
rs.Open Sql,connObj,1,1
%>

  
<table width="100%" align="center" cellpadding="1" cellspacing="1" class=tableborder1>
  <form name="theform" method="post" action="" onSubmit="return CheckInput()">
    <tr > 
      <th height="25" colspan="6" align="center" class=TopLighNav>员工档案</th>
    </tr>
    <tr> 
      <td width="94" align="center" class=tablebody1>姓名</td>
      <td width="147" class=tablebody1><%=rs("name")%></td>
      <td width="39" align="center" class=tablebody1>性别</td>
      <td width="172" class=tablebody1><%
	  	if rs("sex")=1 then
			response.Write("男")
		elseif rs("sex")=0 then
			response.Write("女")
		elseif rs("sex")=2 then
			response.Write("不确定")
		end if
	  %></td>
      <td width="106" align="center" class=tablebody1>出生<br>年月</td>
      <td width="207" class=tablebody1><%=formatdatetime(rs("Birthday"),1)%></td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1>政治<br>面貌</td>
      <td class=tablebody1><%
	  	if rs("politics")=1 then
			response.Write("党员")
		elseif rs("politics")=2 then
			response.Write("团员")
		elseif rs("politics")=3 then
			response.Write("其他")
		end if
	  %></td>
      <td align="center" class=tablebody1>婚姻</td>
      <td class=tablebody1><%
	  	if rs("Marry")=0 then
			response.Write("未婚")
		elseif rs("Marry")=1 then
			response.Write("已婚")
	
		end if
	  %></td>
      <td align="center" class=tablebody1>民族</td>
      <td class=tablebody1><%
	   select case rs("nation")
		case 1
		  response.Write "汉族"
		case 2
		  response.Write "回族"
		case 3
		  response.Write "藏族"
		case 4
		  response.Write "壮族"
		case 5
		  response.Write "瑶族"
		case 6
		  response.Write "彝族"
		case 7
		  response.Write "阿昌族"
		case 8
		  response.Write "白族"
		case 9
		  response.Write "布依族"
		case 10
		  response.Write "傣族"
		case 11
		  response.Write "侗族"
		case 12
		  response.Write "土家族"
		case 13
		  response.Write "独龙族"
		case 14
		  response.Write "仡佬族"
		case 15
		  response.Write "哈尼族"
		case 16
		  response.Write "基诺族"
		case 17
		  response.Write "景颇族"
		case 18
		  response.Write "拉祜族"
		case 19
		  response.Write "黎族"
		case 20
		  response.Write "傈僳族"
		case 21
		  response.Write "珞巴族"
		case 22
		  response.Write "毛南族"
		case 23
		  response.Write "门巴族"
		case 24
		  response.Write "苗族"
		case 25
		  response.Write "仫佬族"
		case 26
		  response.Write "纳西族"
		case 27
		  response.Write "怒族"
		case 28
		  response.Write "普米族"
		case 29
		  response.Write "羌族"
		case 30
		  response.Write "畲族"
		case 31
		  response.Write "水族"
		case 32
		  response.Write "维吾尔族"
		case 33
		  response.Write "哈萨克族"
		case 34
		  response.Write "塔塔尔族"
		case 35
		  response.Write "满族"
		case 36
		  response.Write "蒙古族"
		case 37
		  response.Write "土族"
		case 38
		  response.Write "东乡族"
		case 39
		  response.Write "撒拉族"
		case 40
		  response.Write "保安族"
		case 41
		  response.Write "鄂伦春族"
		case 42
		  response.Write "鄂温克族"
		case 43
		  response.Write "达斡尔族"
		case 44
		  response.Write "赫哲族"
		case 45
		  response.Write "乌兹别克族"
		case 46
		  response.Write "柯尔克孜族"
		case 47
		  response.Write "锡伯族"
		case 48
		  response.Write "裕固族"
		case 49
		  response.Write "朝鲜族"
		case 50
		  response.Write "布朗族"
		case 51
		  response.Write "德昂族"
		case 52
		  response.Write "佤族"
		case 53
		  response.Write "塔吉克斯坦族"
		case 54
		  response.Write "俄罗斯族"
		case 55
		  response.Write "高山族"
		case 56
		  response.Write "京族"
     end select%>
    </tr>
    <tr> 
      <td align="center" class=tablebody1>职称</td>
      <td class=tablebody1><%=rs("Tech_post")%>
      </td>
      <td align="center" class=tablebody1>应聘<br>职位</td>
      <td class=tablebody1><%
	  
	  sql="select stationname from cci_station where id=" & rs("stationid")
	  rsata.open sql,connobj,1,1
	  if not rsata.eof then
  	  	response.Write rsata("stationname")
	  end if
	  rsata.close
	  
	  %></td>
      <td width="106" align="center" class=tablebody1>入职<br>日期</td>
      <td class=tablebody1><%=formatdatetime(rs("InTime"),1)%></td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1>身高</td>
      <td class=tablebody1><%=rs("stature")%>
      </td>
      <td align="center" class=tablebody1>身份证</td>
      <td colspan="3" class=tablebody1><%=rs("IDCard")%>  </td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1>学历</td>
      <td class=tablebody1><%
	  	if rs("Edu_level")=1 then
			response.Write("初中")
		elseif rs("Edu_level")=2 then
			response.Write("中专")
		elseif rs("Edu_level")=3 then
			response.Write("高中")
	  	elseif rs("Edu_level")=4 then
			response.Write("大专")
		elseif rs("Edu_level")=5 then
			response.Write("本科")
		elseif rs("Edu_level")=6 then
			response.Write("硕士")
		elseif rs("Edu_level")=7 then
			response.Write("博士")
						
		end if
	  %></td>
      <td align="center" class=tablebody1>学位</td>
      <td class=tablebody1><%=rs("degree")%>
      </td>
      <td align="center" class=tablebody1>专业</td>
      <td class=tablebody1><%=rs("speciality")%>
      </td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1>计算机<br>能力</td>
      <td class=tablebody1><%=rs("PCability")%>
      </td>
      <td align="center" class=tablebody1>应用<br>软件</td>
      <td class=tablebody1><%=rs("Application")%> 
      </td>
      <td align="center" class=tablebody1>参加<br>工作</td>
      <td class=tablebody1><%=formatdatetime(rs("worktime"),1)%>
      </td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1>专业<br>特长</td>
      <td colspan="3" class=tablebody1><%=rs("StrongSuit")%>
      </td>
      <td align="center" class=tablebody1>业余<br>爱好</td>
      <td class=tablebody1><%=rs("avocation")%>  
      </td>
    </tr>
    <tr> 
      <td  rowspan="2" align="center" class=tablebody1>语言<br>能力</td>
      <td align="center" class=tablebody1>普通话</td>
      <td colspan="3" align="center" class=tablebody1>英语</td>
      <td align="center" class=tablebody1>粤语</td>
    </tr>
    <tr> 
      <td align="center" class=tablebody1><input type="radio" name="chinese" value="1" <%if rs("chinese")=1 then response.Write("checked")%>>熟练 <input type="radio" name="chinese" value="2" <%if rs("chinese")=2 then response.Write("checked")%>>精通</td>
      <td colspan="3" align="center" class=tablebody1><input name="englishL" type="checkbox" id="englishL" value="checkbox" <%if rs("englishL")=1 then response.Write("checked")%>>
<input name="englishT" type="checkbox" id="englishT" value="checkbox" <%if rs("englishT")=1 then response.Write("checked")%>>
        <input name="englishR" type="checkbox" id="englishR" value="checkbox" <%if rs("englishR")=1 then response.Write("checked")%>>
        <input name="englishW" type="checkbox" id="englishW" value="checkbox" <%if rs("englishW")=1 then response.Write("checked")%>>
        写 </td>
      <td align="center" class=tablebody1><input name="GuangDongL" type="checkbox" id="GuangDongL" value="checkbox" <%if rs("GuangDongL")=1 then response.Write("checked")%>>
<input name="GuangDongT" type="checkbox" id="GuangDongT" value="checkbox" <%if rs("GuangDongT")=1 then response.Write("checked")%>>
        说</td>
    </tr>
    <tr > 
      <td rowspan="2" align="center" class=tablebody1>户口<br>所在地</td>
      <td colspan="5" class=tablebody1><%=rs("Register")%></td>
    </tr>
    <tr > 
      <td class=tablebody1>邮政<br>编码</td>
      <td colspan="2" class=tablebody1><%=rs("Reg_postcode")%></td>
      <td align="center" class=tablebody1>联系<br>电话</td>
      <td class=tablebody1><%=rs("RegTel")%></td>
    </tr>
    <tr > 
      <td rowspan="2" align="center" class=tablebody1>现住址</td>
      <td colspan="5" class=tablebody1><%=rs("Dwelling")%></td>
    </tr>
    <tr > 
      <td height="20" class=tablebody1>邮政<br>编码</td>
      <td colspan="2" class=tablebody1><%=rs("Dw_postcode")%></td>
      <td align="center" class=tablebody1>联系<br>电话</td>
      <td class=tablebody1><%=rs("DW_Tel")%></td>
    </tr>
    <tr > 
      <td align="center" class=tablebody1>紧急<br>联系</td>
      <td class=tablebody1>电话</td>
      <td colspan="2" class=tablebody1><%=rs("Urgency_Tel")%></td>
      <td align="center" class=tablebody1>其他<br>电话</td>
      <td class=tablebody1><%=rs("Urgency_other")%></td>
    </tr>
  </form>
</table>
<%
rs.close
%>
<table width="100%" align="center" cellpadding="1" cellspacing="1" class=tableborder1>
<tr><td class=TopLighNav colspan="5"><b>教育背景</b></td></tr>
<tr>
      <td width="200" align="center" class=tablebody1>时间</td>
	  <td width="150" align="center" class=tablebody1>学校</td>
      <td width="80" align="center" class=tablebody1>专业</td>
	  <td width="80" align="center" class=tablebody1>方式</td>
      <td align="center" class=tablebody1>所受奖励</td>
    </tr>
<%
sql="select * from cci_oa_embg where srcid="& request("id")
rs.Open Sql,connObj,1,1
do while not rs.eof 
	response.Write "<tr align=center>"
	response.Write "<td class=tablebody1>" & formatdatetime(rs("starttime"),2) & "-" & formatdatetime(rs("endtime"),2)  & "</td>"
	response.Write "<td class=tablebody1>" &rs("school") & "</td>"
    response.Write "<td class=tablebody1>" & rs("speciality")& "</td>"
	response.Write "<td class=tablebody1>" &rs("mode") & "</td>"
    response.Write "<td class=tablebody1>" &rs("encourage")& "</td>"
	response.Write "</tr>"
	rs.movenext
loop
rs.close
%>	
</table>	
<table width="100%" align="center" cellpadding="1" cellspacing="1" class=tableborder1>
<tr><td class=TopLighNav colspan="5"><b>工作经历</b></td></tr>
<tr>
      <td width="200" align="center" class=tablebody1>时间</td>
	  <td width="150" align="center" class=tablebody1>单位</td>
      <td width="80" align="center" class=tablebody1>职位</td>
	  <td width="80" align="center" class=tablebody1>证明人</td>
      <td align="center" class=tablebody1>联系电话</td>
    </tr>
<%
sql="select * from cci_oa_exper where srcid="& request("id")
rs.Open Sql,connObj,1,1
do while not rs.eof 
	response.Write "<tr align=center>"
	response.Write "<td class=tablebody1>" & formatdatetime(rs("starttime"),2) & "-" & formatdatetime(rs("endtime"),2)  & "</td>"
	response.Write "<td class=tablebody1>" &rs("Jobunit") & "</td>"
    response.Write "<td class=tablebody1>" & rs("Station")& "</td>"
	response.Write "<td class=tablebody1>" &rs("prover") & "</td>"
    response.Write "<td class=tablebody1>" &rs("Prove_tel")& "</td>"
	response.Write "</tr>"
	rs.movenext
loop
rs.close
%>		
</table>
<table width="100%" align="center" cellpadding="1" cellspacing="1" class=tableborder1>
<tr><td  class=TopLighNav colspan="5"><b>家庭成员</b></td></tr>
<tr>
      <td width="50" align="center" class=tablebody1>关系</td>
	  <td width="80" align="center" class=tablebody1>姓名</td>
      <td width="80" align="center" class=tablebody1>年龄</td>
	  <td width="200" align="center" class=tablebody1>工作单位</td>
      <td align="center" class=tablebody1>联系电话</td>
    </tr>
<%
sql="select * from cci_oa_Member where srcid="& request("id")
rs.Open Sql,connObj,1,1
do while not rs.eof 
	response.Write "<tr align=center>"
	response.Write "<td class=tablebody1>" &rs("relation") & "</td>"
    response.Write "<td class=tablebody1>" & rs("Name")& "</td>"
	response.Write "<td class=tablebody1>" &rs("age") & "</td>"
    response.Write "<td class=tablebody1>" &rs("Jobunit")&"</td>"
	response.Write "<td class=tablebody1>" & rs("Tel")  & "</td>"
	response.Write "</tr>"
	rs.movenext
loop
rs.close
%>		
</table>
  <div align="center"><a href="javascript:history.go(-1)">返回</a></div>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -