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

📄 o_pathlist.asp

📁 房地产信息管理平台
💻 ASP
字号:
<!--#include file="../../showsort/showsort(bangong).asp"-->
<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">
<center>
<!-- #include File=../../include/title2.asp -->
<% 
	function writek(k)
		if k&""<>"" then
			k=replace(k,"&","&amp;")
			k=replace(k,"<","&lt;")
			k=replace(k,">","&gt;")
			k=replace(k,chr(36),"&quot;")
			if len(k)>17 then
				writek=left(k,16)&"..."
			else
				writek=k
			end if
		end if
	end function

	function wrtsb(k)
		if k&""<>"" then
			k=replace(k,"&","&amp;")
			k=replace(k,"<","&lt;")
			k=replace(k,">","&gt;")
			wrtsb=k
		end if
    end function
    set rs=server.createobject("ADODB.Recordset")
       rs.Open "select a.okname,a.id,a.doname,a.manager,a.deptid,b.deptname from  office_deptpath as a,manage_dept as b where a.deptid=b.id",source,3,3
   rs.PageSize =30
   Page = Clng(Request("Page"))  
   if  Clng(Request("Page"))>rs.pagecount then  page=rs.pagecount
   if page<1 then page=1   
    %> 
  <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> <a href="#"><font color="#FFFFFF">办公用品</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td width="18%"></td>
              <td width="16%"></td>
              <td width="66%"><a href="../office/o_index.asp"><font color="#FFFFFF">&gt; 
                办公用品列表</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../office/o_pathlist.asp"><font color="#FFFFFF">&gt; 
                申请流程设定</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../office/o_deptwait.asp"><font color="#FFFFFF">&gt; 
                待批办公用品</font></a></td>
            </tr>            <tr class="bgcolor2">               <td></td>              <td></td>              <td><a href="../office/o_deptlist.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> <a href="#"><font color="#FFFFFF">文档管理</font></a></td>            </tr>
            <tr class="bgcolor2"> 
              <td width="18%"></td>
              <td width="16%"></td>
              <td width="66%"><a href="../file/f_index.asp"><font color="#FFFFFF">&gt; 
                查看文档</font></a><a href="allforums.asp?action=all"></a><a href="../schedule/s_menu_wait.asp"></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../file/f_adddept.asp"><font color="#FFFFFF">&gt; 新建文档</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td align="left"><a href="../file/f_setsort.asp"><font color="#FFFFFF">&gt; 
                设置文档</font></a><font color="#FFFFFF"></font></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../file/f_search.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> <a href="#"><font color="#FFFFFF">图书管理</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td width="18%"></td>
              <td width="16%"></td>
              <td width="66%"><a href="../book/b_index.asp"><font color="#FFFFFF">&gt; 
                查看图书</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../book/b_add1.asp"><font color="#FFFFFF">&gt; 添加图书</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td align="left"><a href="../book/b_doapply1.asp"><font color="#FFFFFF">&gt; 
                管理图书</font></a><a href="findplacard.asp"></a></td>
            </tr>
            <tr class="bgcolor4"> 
              <td width="18%"></td>
              <td width="82%" colspan="2"><font color="#FFFFFF">::::</font> <a href="#"><font color="#FFFFFF">车辆管理</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td width="18%"></td>
              <td width="16%"></td>
              <td width="66%"><a href="../car/c_list.asp"><font color="#FFFFFF">&gt; 
                查看车辆</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../car/c_add.asp"><font color="#FFFFFF">&gt; 添加车辆</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../car/c_pathlist.asp"><font color="#FFFFFF">&gt; 
                申请流程设定</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td align="left"><a href="../car/c_manage.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> <a href="#"><font color="#FFFFFF">会议室管理</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td width="18%"></td>
              <td width="16%"></td>
              <td width="66%"><a href="../meeting/m_list.asp"><font color="#FFFFFF">&gt; 
                查看会议室</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../meeting/m_add.asp"><font color="#FFFFFF">&gt; 添加会议室</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td><a href="../meeting/m_pathlist.asp"><font color="#FFFFFF">&gt; 
                申请流程设定</font></a></td>
            </tr>
            <tr class="bgcolor2"> 
              <td></td>
              <td></td>
              <td align="left"><a href="../meeting/m_manage.asp"><font color="#FFFFFF">&gt; 
                管理会议室</font></a></td>
            </tr>
            <tr class="bgcolor4"> 
              <td colspan="3" height="80"></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")%>/resource.gif'); background-repeat: no-repeat">&nbsp;&nbsp;&nbsp;&nbsp; 
                      <font color="#000080">&nbsp;&nbsp;企业资源</font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                      &nbsp;申请办公用品审批流程&nbsp;&nbsp;<a href="o_newdeptpath.asp">新建流程</a></td>       
                </tr>       
                <tr>  
                  <td width="100%" height="10"></td>       
                </tr>  
                <tr>  
                    <td width="100%" height="10"> 
<table border="1" cellspacing="0" cellpadding="0"  bordercolorlight="#CCCCCC" bordercolordark="#ffffff"  width="100%" class="L2" align="center">
                                    <tr> 
                                      <td width="30%"> 
                                        <div align="center">部门</div>
                                      </td>
                                      <td width="10%"> 
                                        <div align="center">部门经办人</div>
                                      </td>
                                      <td width="10%"> 
                                        <div align="center">部门审批人</div>
                                      </td>
                                      <td width="20%"> 
                                        <div align="center"><font color="#000000">办公室经办人</font></div>
                                      </td><% if sort=3 then %>
                                      <td width="10%"> 
                                        <div align="center">修改</div>
                                      </td><% end if %>
                                    </tr>
<% 
if not rs.eof then    
maxpage=rs.pagecount                                         
rs.absoluteposition=(page-1)*rs.pagesize+1            
for i=1 to rs.pagesize                                                     
if rs.eof then exit for                                                     
%>
<tr>
                                      <td width="30%" align="center" ><%=rs("deptname")%></td>
                                      <td align="center" width="10%"><%=rs("okname")%></td>
                                      <td align="center" width="10%"><%=rs("manager")%></td>
                                      <td align="center" width="20%"><%=rs("doname")%>&nbsp;</td><% if sort=3 then %>
                                      <td width="10%" align="center"><a href="#" onClick="window.open('o_deptpathmodify.asp?id=<%=rs("id")%>','','left=300,top=130,width=300,height=220')">修改</a></td><% end if %>
</tr>
<%rs.movenext       
 next
rs.close
end if%> 
                                  </table></td>       
                </tr>  
              </table>        
            </td>        
          </tr>        

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

⌨️ 快捷键说明

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