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

📄 m_compact.asp

📁 房地产信息管理平台
💻 ASP
字号:
<!-- #include File=../../showsort/showsort(man).asp -->
<%if sort<2 then%>
<script language="JavaScript">
alert("对不起,您没有权限!!");
window.history.back();
</script>
<%end if%>
<%
id=request("id")
'-----------获取用户姓名
set rs=server.createobject("adodb.recordset")
rs.open "select name from manage_user where id="&request("id"),source,3,3
name=rs("name")
rs.close
'-----------查出合同签订方式及次数
set rss=server.createobject("adodb.recordset")
rss.open "select * from m_compact where userid="&id,source,3,3
maxrecord=rss.recordcount
rss.close
set rs=server.createobject("adodb.recordset")
sql="select * from m_compact where userid="&id&" and annex>0"
rs.open sql,source,3,3
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>PMIS</title>
<LINK href="../../<%=session("color")%>.css" rel=stylesheet type=text/css>
</head>

<body topmargin="0" leftmargin="0">

<div align="center">
<center>
<!-- #include File=../../include/title2.asp -->
</center>       
</div>       
       
<div align="center">       
  <center>       
  <table width="100%" cellspacing cellpadding>       
    <tr>       
        <td width="20%" class="Titletd1" height="365" valign="top"> 
          <table width="158" cellspacing cellpadding class="L2">
            <tr> 
              <td height="10" colspan="3" class="bgcolor4"></td>
            </tr>
            <tr class="bgcolor4"> 
              <td width="18%"></td>
              <td width="82%" colspan="2"><font color="#FFFFFF">::::</font><font color="#FFFFFF">部门管理</font></td>
            </tr>
            <tr class="bgcolor2"> 
              <td width="18%"></td>
              <td width="16%"></td>
              <td width="66%"><a href="../dept/d_list.asp"><font color="#FFFFFF">&gt; 
                部门一览</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../dept/d_input.asp"><font color="#FFFFFF">&gt; 新增部门</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../dept/d_del.asp"><font color="#FFFFFF">&gt; 删除部门</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../dept/d_list4.asp"><font color="#FFFFFF">&gt; 部门人员</font></a></td>
            </tr>
            <tr class="bgcolor4"> 
              <td width="18%"></td>
              <td width="82%" colspan="2"><font color="#FFFFFF">::::</font><font color="#FFFFFF">员工管理</font></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../man/m_modify.asp"><font color="#FFFFFF">&gt; 员工一览</font></a></td>
            </tr>
<tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../man/m_addnewuser.asp"><font color="#FFFFFF">&gt; 
                新增员工</font></a></td>
            </tr>            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../man/m_del.asp"><font color="#FFFFFF">&gt; 删除员工</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../man/m_leave.asp"><font color="#FFFFFF">&gt; 离职员工</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../man/m_wagemonth.asp"><font color="#FFFFFF">&gt; 
                工资报表</font></a></td>
            </tr>
            <tr class="bgcolor4"> 
              <td width="18%"></td>
              <td width="82%" colspan="2"><font color="#FFFFFF">::::日常人事管理</font></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="d_list-tj.asp"><font color="#FFFFFF">&gt; 添加申请</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="d_list-sp.asp"><font color="#FFFFFF">&gt; 人事审批</font></a></td>
            </tr>
            <tr class="bgcolor2">               <td></td>              <td></td>              <td><a href="d_list-pz.asp"><font color="#FFFFFF">&gt; 人事配置</font></a></td>            </tr>            <tr class="bgcolor2">               <td></td>              <td></td>              <td><a href="d_list-lcsz.asp"><font color="#FFFFFF">&gt; 人事流程设置</font></a></td>            </tr>
            <tr class="bgcolor4"> 
              <td colspan="3" height="200"></td>
            </tr>
          </table>
        </td>
        <td width="1%" bgcolor="#FFFFFF"></td>     
        <td width="79%" bgcolor="#FFFFFF" valign="top"> 
          <table width="100%" cellspacing cellpadding>     
          <tr>     
            <td width="100%" height="10"></td>     
          </tr>     
          <tr>     
            <td width="100%">     
              <table width="100%" cellspacing cellpadding>     
                <tr>     
                    <td width="100%" height="25" style="background-image: url('../../images/<%=session("color")%>/hrm.gif'); background-repeat: no-repeat">&nbsp;&nbsp;&nbsp;&nbsp; 
                      <font color="#000080">&nbsp;&nbsp;员工管理</font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                      &nbsp;员工信息</td>       
                </tr>       
                <tr>  
                  <td width="100%" height="10"></td>       
                </tr>  
                <tr>  
                    <td width="100%" height="10"> 
                      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
                        <%
if not rs.eof then
%> 
                        <tr> 
                          <td align="center" valign="top"> 
                            <table width="100%" border="0" cellspacing="0" cellpadding="0" class="L2">
                              <tr> 
                                <td colspan="4">员工<font color="#CC0000"><%=name%></font>合同信息表&nbsp;</td>
                              </tr>
                              <tr> 
                                <td width="120">合同开始日期</td>
                                <td><%=rs("statetime")%></td>
                                <td width="120">合同结束日期</td>
                                <td><%=rs("overtime")%></td>
                              </tr>
                              <tr> 
                                <td width="120">签订时间</td>
                                <td colspan="3"><%=rs("register")%></td>
                              </tr>
                              <tr> 
                                <td width="120">合同签订方式</td>
                                <td colspan="3"><% if maxrecord=1 then %>新签合同<% else %>续签合同,现在是第<%=maxrecord%>份合同<% end if %>&nbsp;</td>
                              </tr>
                              <tr> 
                                <td width="120">合同类别</td>
                                <td colspan="3"><%=rs("state")%>&nbsp;</td>
                              </tr>
                              <tr> 
                                <td width="120">合同签订期限</td>
                                <td colspan="3"><%=year(rs("overtime"))-year(rs("statetime"))%>年&nbsp;</td>
                              </tr>
                              <%
        if rs("annex")>0 then
	Set fso = CreateObject("Scripting.FileSystemObject")
	Set f = fso.GetFolder(server.MapPath("compact_"&rs("id")))
        fpath="compact_"&rs("id")
	Set fc=f.Files
	adds=0
%> 
                              <tr> 
                                <td width="120">合同附件</td>
                                <td colspan="3"> 
                                  <select name="file" class="unnamed3" onChange="if(this.value!='0'){ window.open('<%=fpath%>/'+this.value);}">
                                    <option value="0" selected>点击下载文件</option>
                                    <% for each f1 in fc%> 
                                    <option value="<%=f1.name%>"><%=f1.name%></option>
                                    <% 
adds=adds+1
next
%> 
                                  </select>
                                </td>
                              </tr>
                              <%
end if
%> 
                              <tr> 
                                <td width="120">特别条款</td>
                                <td colspan="3"><%=rs("notice")%>&nbsp;</td>
                              </tr>
                              <tr> 
                                <td width="120">备注</td>
                                <td colspan="3"><%=rs("brief")%>&nbsp;</td>
                              </tr>
                              <tr> 
                                <td colspan="4" valign="top" align="center"> <a href="m_look.asp?id=<%=request("id")%>"><font color="#0000FF">基本信息</font></a>&nbsp;&nbsp;<a href="m_compact.asp?id=<%=request("id")%>"><font color="#0000FF">合同信息</font></a>&nbsp;&nbsp;<a href="m_wagelist.asp?userid=<%=request("id")%>"><font color="#0000FF">工资信息</font></a></td>
                              </tr>
                            </table>
                          </td>
                        </tr>
                        <%
rs.close
else
%> 
                        <tr> 
                          <td class="L2">暂无该员工合同信息,您要<a href="m_addcompact.asp?id=<%=id%>">添加</a>吗?</td>
                        </tr>
                        <%
end if
%> 
                      </table>
                    </td>       
                </tr>  
              </table>        
            </td>        
          </tr>        

        </table>       
      </td>       
    </tr>   
  </table>   
  </center>   
</div>   
<div align="center">   
<!-- #include File=../../include/last2.asp -->
</div>        
        
</body>        
        
</html>        

⌨️ 快捷键说明

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