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

📄 empmain_base_disp.asp

📁 欢迎大家分享本系统为bs架构的asp+access版本。<br>包含:员工信息
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/EmpMain.asp" -->
<!--#include file="EmpMain_CheckRight.asp"-->
<%
if request.QueryString("pagetype") <> "" then
if request.QueryString("pagetype") <> "Base"  then
url = "empmain_" &request.QueryString("pagetype")& "_Disp.asp?ID=" & request.QueryString("ID") & "&pagetype=" & request.QueryString("pagetype")
response.Redirect(url)
response.end 
end if
end if
%>
<%call fnCheckRight("GeneralInfo","1")%>
<%

Dim genInfo__MMColParam
genInfo__MMColParam = "1"
If (Request.QueryString("ID") <> "") Then 
  genInfo__MMColParam = Request.QueryString("ID")
End If
%>
<%
Dim genInfo
Dim genInfo_numRows

Set genInfo = Server.CreateObject("ADODB.Recordset")
genInfo.ActiveConnection = MM_EmpMain_STRING
genInfo.Source = "SELECT * FROM EmpGeneralInfo WHERE ID = " + Replace(genInfo__MMColParam, "'", "''") + ""
genInfo.CursorType = 0
genInfo.CursorLocation = 2
genInfo.LockType = 1
genInfo.Open()

genInfo_numRows = 0
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>姓名</title>
<link rel="stylesheet" href="CSS/SellWellWeb.css" type="text/css">
</head>

<body class="body">
<form method="POST" action="EmpMain_Base_Disp.asp" webbot-action="--WEBBOT-SELF--" class="body">
  <fieldset style="padding: 2" class="fiedset"> <legend>基本信息</legend> 
  <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber1" class="table" align="center">
    <tr> 
      <td nowrap align="right" class="Caption" width="25%">编号:</td>
      <td class="ValueArea" width="25%"><%=(genInfo.Fields.Item("EmpCompID").Value)%></td>
      <td nowrap align="right" class="Caption" width="25%">姓名:</td>
      <td width="25%" class="ValueArea"> <p align="left"><%=(genInfo.Fields.Item("EmpName").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">英文名:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpEnglishName").Value)%></td>
      <td width="25%" nowrap align="right" class="Caption">身份证号:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpSelfID").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">性别:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpGender").Value)%></td>
      <td width="25%" nowrap align="right" class="Caption">出生年月:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpBirthDay").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">籍贯:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpNativePlace").Value)%></td>
      <td width="25%" nowrap align="right" class="Caption">户籍地址:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpNativeAddress").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">现址:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpNowAddress").Value)%></td>
      <td width="25%" nowrap align="right" class="Caption">电话:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpNowTel").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">户籍状况:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpEvenAddress").Value)%></td>
      <td width="25%" nowrap align="right" class="Caption">手机:</td>
      <td width="25%"  class="ValueArea"><%=(genInfo.Fields.Item("EmpEvenTel").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">通讯地址:</td>
      <td colspan="3" class="ValueArea"><%=(genInfo.Fields.Item("EmpCommAddress").Value)%></td>
    </tr>
    <tr> 
      <td nowrap align="right" class="Caption" width="25%">邮政编码:</td>
      <td class="ValueArea" width="25%"><%=(genInfo.Fields.Item("EmpZipcode").Value)%></td>
      <td nowrap align="right" class="Caption" width="25%">最终学历:</td>
      <td width="25%" class="ValueArea"><%=(genInfo.Fields.Item("EmpFinallevel").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" height="20" class="Caption">进公司时间:</td>
      <td width="25%" height="20" class="ValueArea"><%=(genInfo.Fields.Item("EmphireDate").Value)%></td>
      <td width="25%" nowrap align="right" height="20" class="Caption">部门:</td>
      <td width="25%" height="20" class="ValueArea"><%=(genInfo.Fields.Item("EmpHireDep").Value)%></td>
    </tr>
    <tr> 
      <td nowrap align="right" height="20" class="Caption">职位:</td>
      <td height="20" class="ValueArea"><%=(genInfo.Fields.Item("EmpTitle").Value)%></td>
      <td nowrap align="right" height="20" class="Caption">是否正式员工:</td>
      <td height="20" class="ValueArea"><%=(genInfo.Fields.Item("IsTemp").Value)%></td>
    </tr>
    <tr> 
      <td nowrap align="right" height="20" class="Caption">预转正/转正日期:</td>
      <td height="20" class="ValueArea"><%=(genInfo.Fields.Item("EmpTrueDate").Value)%></td>
      <td nowrap align="right" height="20" class="Caption">离职日期:</td>
      <td height="20" class="ValueArea"><%=(genInfo.Fields.Item("EmpDimissionDate").Value)%></td>
    </tr>
    <tr> 
      <td width="25%" nowrap align="right" class="Caption">离职原因:</td>
      <td colspan="3" class="ValueArea"><%=(genInfo.Fields.Item("EmpDimissionReson").Value)%></td>
    </tr>
  </table>

  </fieldset></form>

<div align="right">
  <input type="button" name="Submit" value="修改" class="button" onclick="window.location.href='EmpMain_Base_Edit.asp?ID=<%=request.QueryString("ID")%>'">
</div>
</body>

</html>
<%
genInfo.Close()
Set genInfo = Nothing
%>

⌨️ 快捷键说明

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