📄 m_orderlist.asp
字号:
<!-- #include File=../../showsort/showsort(meeting).asp -->
<%
function writek(k)
if k&""<>"" then
k=replace(k,"&","&")
k=replace(k,"<","<")
k=replace(k,">",">")
k=replace(k,chr(36),""")
if len(k)>12 then
writek=left(k,11)&"..."
else
writek=k
end if
end if
end function
function wrtsb(k)
if k&""<>"" then
k=replace(k,"&","&")
k=replace(k,"<","<")
k=replace(k,">",">")
k=replace(k,chr(36),""")
wrtsb=k
end if
end function
%>
<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> <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">>
办公用品列表</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../office/o_pathlist.asp"><font color="#FFFFFF">>
申请流程设定</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../office/o_deptwait.asp"><font color="#FFFFFF">>
待批办公用品</font></a></td>
</tr> <tr class="bgcolor2"> <td></td> <td></td> <td><a href="../office/o_deptlist.asp"><font color="#FFFFFF">> 部门办公用品</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">>
查看文档</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">> 新建文档</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../file/f_setsort.asp"><font color="#FFFFFF">>
设置文档</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">> 检索文档</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">>
查看图书</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../book/b_add1.asp"><font color="#FFFFFF">> 添加图书</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../book/b_doapply1.asp"><font color="#FFFFFF">>
管理图书</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">>
查看车辆</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../car/c_add.asp"><font color="#FFFFFF">> 添加车辆</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../car/c_pathlist.asp"><font color="#FFFFFF">>
申请流程设定</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../car/c_manage.asp"><font color="#FFFFFF">>
管理车辆</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">>
查看会议室</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../meeting/m_add.asp"><font color="#FFFFFF">> 添加会议室</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td><a href="../meeting/m_pathlist.asp"><font color="#FFFFFF">>
申请流程设定</font></a></td>
</tr>
<tr class="bgcolor2">
<td></td>
<td></td>
<td align="left"><a href="../meeting/m_manage.asp"><font color="#FFFFFF">>
管理会议室</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">
<font color="#000080"> 企业资源</font>
查看会议室</td>
</tr>
<tr>
<td width="100%" height="10"></td>
</tr>
<tr>
<td width="100%" height="10"> 会议室名：<%=request("name")%> <%
set rs3=server.createobject("ADODB.Recordset")
rs3.Open "Select * from meeting_use where name='"&request("name")&"' order by first_date desc ",source,3,3
if not rs3.eof then
rs3.PageSize = 10
Page = CLng(Request("Page"))
if page<1 then page=1
rs3.absoluteposition=(page-1)*rs3.pagesize+1
maxrecord=rs3.recordcount
maxpage=rs3.pagecount
%>
<script language="JavaScript">
function check2(xxx)
{
if (isNaN(xxx.page.value.substring(0,2)))
{ alert("只能输入数字！")
return false
}
if (xxx.page.value=="")
{ alert("对不起，不能输入空值！")
return false
}
if (xxx.page.value><%=rs3.pagecount%>)
{ alert("对不起，您输入的数超出了页码范围！")
return false
}
return true
}
</script>
<table width="100%" border="1" cellspacing="0" cellpadding="0" align="center" bordercolordark="#FFFFFF" bordercolorlight="#CCCCCC" class="L2">
<tr>
<td height="23" align="center"> <b>申请者</b></td>
<td height="23" align="center"> <b>申请开始时间</b></td>
<td height="23" align="center"> <b>申请结束时间</b></td>
<td height="23" align="center" width="160"> <b>申请原因</b></td>
<td height="23" align="center"> <b>审批情况</b></td>
<td height="23" align="center"> <b>审批者</b></td>
</tr>
<%
for i=1 to 10
%>
<tr>
<td align="center" height="23"><%=rs3("man")%> </td>
<td align="center" height="23"> <%=formatdatetime(rs3("first_date"),vbshortdate)%> <%=formatdatetime(rs3("first_date"),vbshorttime)%></td>
<td align="center" height="23"><%=formatdatetime(rs3("last_date"),vbshortdate)%> <%=formatdatetime(rs3("last_date"),vbshorttime)%></td>
<td align="center" height="23" width="160"><font title="申请原因：<%=wrtsb(rs3("excuse"))%>"><%=writek(rs3("excuse"))%> </font>
</td>
<td align="center" height="23"> <%if rs3("sign")=0 then%>
未审批 <%else%> 已审批 <%end if %> </td>
<td height="23" align="center"> <% if rs3("doman")<>"" then %><%=rs3("doman")%><% else %>无</a><% end if %>
</td>
</tr>
<%
rs3.movenext
if rs3.eof then exit for
next
rs3.close
%>
</table>
<table border="0" cellspacing="0" align="center" class="L2" width="96%">
<form method="post" action="m_orderlist.asp" onSubmit="return check2(this)">
<tr>
<td width="4" valign="bottom"> </td>
<td width="65" valign="bottom"><% if page>1 then %><a href="m_orderlist.asp?Page=<%=(page-1)%>&name=<%=request("name")%>">上一页</a><% else %>上一页<% end if %></td>
<td width="78" valign="bottom">
<div align="center">第<font color="#FF0000" ><%=Page%></font>页/共<font color="#FF0000" ><%=maxpage%></font>页</div>
</td>
<td width="64" valign="bottom">
<div align="right">翻到第</div>
</td>
<td width="60">
<input type="text" name="page" size="6" class="input1" maxlength="5" onMouseOver=this.focus()>
<input type="hidden" name="name" value="<%=request("name")%>">
</td>
<td width="32" valign="bottom">页</td>
<td width="32" valign="bottom">
<input type="image" border="0" name="imageField2" src="../../images/i_button_15.gif" width="25" height="18">
</td>
<td align="right" width="63" valign="bottom">共<font color="#CC0000"><%=maxrecord%></font>条</td>
<td align="right" width="64" valign="bottom"> <% if maxpage>page then %>
<a href="m_orderlist.asp?Page=<%=(page+1)%>&name=<%=request("name")%>">下一页</a>
<% else %> 下一页 <% end if %> </td>
</tr>
<tr>
<td colspan="9" valign="top"> </td>
</tr>
</form>
</table>
<% else %> 暂无申请记录！ <% end if %> </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 + -