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

📄 o_index.asp

📁 房地产信息管理平台
💻 ASP
字号:
<!--#include file="../../showsort/showsort(bangong).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")
	set rs1=server.createobject("ADODB.Recordset")
       rs.Open "select * from office_setup order by unit",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">
<!-- #include File=../../include/title2.asp -->

  <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;<% if sort=3 then %><a href="#" onClick="window.open('o_newinput.asp','','left=300,top=130,width=230,height=220')">添加办公用品</a><% end if %>&nbsp;&nbsp;<% if sort=2 then %><a href="o_adddept.asp">申领办公用品</a><% end if %></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="40%">
                            <div align="center"><font color="#000000">备注</font></div>
                          </td><% if sort=3 then %>
                          <td width="10%">
                            <div align="center">修改</div>
                          </td><% end if %>
                        </tr>
<% 
while not rs.eof 
if newunit<>rs("unit") then  
rs1.open "select * from office_setup where unit='"&rs("unit")&"'",source,3,3
maxcount=rs1.recordcount
rs1.close
%> 
                        <tr>
                          <td width="30%" align="center" ><%=rs("name")%></td>
                          <td align="center" width="10%" rowspan="<%=maxcount%>"><%=rs("unit")%></td>
                          <td align="center" width="10%"><%=rs("price")%></td>
                          <td align="center" width="40%"><%=rs("brief")%>&nbsp;</td>
                          <% if sort=3 then %><td width="10%" align="center"><a href="#" onClick="window.open('o_newmodify.asp?id=<%=rs("id")%>','','left=300,top=130,width=230,height=220')">修改</a></td><% end if %>
                        </tr>
<%
newunit=rs("unit")
else
%>
                        <tr>
                          <td width="30%" align="center" ><%=rs("name")%></td>
                          <td align="center" width="10%"><%=rs("price")%></td>
                          <td align="center" width="40%"><%=rs("brief")%>&nbsp;</td>
                          <% if sort=3 then %><td width="10%" align="center"><a href="#" onClick="window.open('o_newmodify.asp?id=<%=rs("id")%>','','left=300,top=130,width=230,height=220')">修改</a></td><% end if %>
                        </tr>
<%
end if
rs.movenext
wend
rs.close
%> 
                      </table>
                    </td>
                </tr>
              </table>
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
<!-- #include File=../../include/last2.asp -->
</div>
</body>
</html>

⌨️ 快捷键说明

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