📄 findshouwen.asp
字号:
<!--#include file="check.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<!--#INCLUDE FILE="checksql.asp" -->
<html>
<head>
<title>办公自动化（OA）</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="apply.css" type="text/css">
</head>
<%
select case session("power")
case 1
miji="miji in('普通')"
case 2
miji="miji in('秘密','普通')"
case 3
miji="miji in('绝密','秘密','普通')"
end select
timestart=checksql(request("timestart"))
timeend=checksql(request("timeend"))
keywords=checksql(request("keywords"))
zihao=checksql(request("zihao"))
set rs=server.createobject("adodb.recordset")
if request("timestart")="" and request("timeend")="" then
sql="select writename,id,title,swid,title,donetime from shouwen where status=1 and swid like '%"& request("zihao") &"%'and title like '%"& request("keywords") &"%' and "&miji&" order by donetime desc"
end if
if request("timestart")<>"" and request("timeend")="" then
sql="select writename,id,title,swid,title,donetime from shouwen where status=1 and swid like '%"& request("zihao") &"%'and title like '%"& request("keywords") &"%' and donetime>#"& request("timestart") &"# and "&miji&" order by donetime desc"
end if
if request("timestart")="" and request("timeend")<>"" then
sql="select writename,id,title,swid,title,donetime from shouwen where status=1 and swid like '%"& request("zihao") &"%'and title like '%"& request("keywords") &"%' and donetime<#"& request("timeend") &"# and donetime>'"& request("timestart") &"' and "&miji&" order by donetime desc"
end if
if request("timestart")<>"" and request("timeend")<>"" then
sql="select writename,id,title,swid,title,donetime from shouwen where status=1 and swid like '%"& request("zihao") &"%'and title like '%"& request("keywords") &"%' and donetime>#"& request("timestart") &"# and donetime<#"& request("timeend") &"# and "&miji&" order by donetime desc"
end if
rs.open sql,conn,1,3
TSum=1
mypage=10
rs.pagesize=CINT(mypage)
PageNo=CLng(REQUEST("PageNo"))
if PageNo="" or PageNo=0 then
PageNo=1
else
PageNo=PageNo+1
PageNo=PageNo-1
end if
if not rs.eof then
rs.absolutepage=PageNo
TSum=INT(rs.RECORDCOUNT/Mypage*-1)*-1
RowCount=rs.PageSize
nowrecord=0
end if
%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" oncontextmenu="return false">
<div align="center">
<form name="form" method="POST" action="">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="50" align="center" colspan="4">
<img src="images/findshouwen.gif"></td>
</tr>
<tr>
<td height="10" colspan="4">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26" bgcolor="#D4DEF4">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="2"></td>
</tr>
<tr>
<td width="3%" align="center"> </td>
<td> 共计<%=tsum%>页,目前第<font color="#ff5bad"><%=PageNo%></font>页,共查询到
<font color="#ff5bad"><%=rs.recordcount %></font>个收文</td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="2"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26" bgcolor="E7ECF7">
<tr>
<td width="19%" align="center" height="25">收 文 号</td>
<td align="center" width="43%" height="25"> 标 题</td>
<td align="center" width="20%" height="25">拟 办 人</td>
<td align="center" width="18%" height="25">归档时间</td>
</tr>
<tr height="1">
<td bgcolor="#C9E9FC" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
</table>
</td>
</tr>
<%if rs.eof then %>
<tr height="1">
<td bgcolor="#ffffff" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr bgcolor="#F5FAFD" align="center">
<td height="26" colspan="4" >
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td align="center" class="f6wait">没有找到相应的内容</td>
</tr>
</table>
</td>
</tr>
<tr height="1">
<td bgColor="#D6E1F8" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<% else %>
<% for i=1 to mypage
if rs.eof then exit for
%>
<tr height="1">
<td bgcolor="#ffffff" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr bgcolor="#F5FAFD">
<td height="26" width="19%" bgcolor="#F5FAFD" align="center"> <a href="readshouwengd.asp?flowid=<%=rs("id")%>" class="aapply"><%=rs("swid")%></a></td>
<td height="26" width="43%" align="center"> <a href="readshouwengd.asp?flowid=<%=rs("id")%>" class="aapply">
<%temp=""&rs("title")
if len(temp)>20 then
temp=left(temp,20)&"…"
end if
response.write(temp)
%>
</a></td>
<td height="26" width="20%" align="center" class="applygz"><%=rs("writename")%></td>
<td height="26" width="18%" align="left" class="applygz"><%=rs("donetime")%></td>
</tr>
<tr height="1">
<td bgColor="#D6E1F8" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%
rs.movenext
next
end if
%>
<tr>
<td height="10" colspan="4">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26" bgcolor="#D4DEF4">
<tr height=1>
<td bgcolor="#A7BAE4" height="1"></td>
</tr>
<tr>
<td align="center"> <a href="findwork.asp" class="aapply">转到公文查询</a>
<%
if (PageNo*mypage-mypage)>0 then
PrwePage=PageNo-1
response.write "<a href='findshouwen.asp?timestart="×tart&"&timeend="&timeend&"&keywords="&keywords&"&zihao="&zihao&"&PageNo="&PrwePage&"' class='aapply'>上一页</a> "
else
response.write "上一页 "
end if
if (PageNO*mypage)<rs.recordcount then
NextPage=PageNo+1
response.write" <a href='findshouwen.asp?timestart="×tart&"&timeend="&timeend&"&keywords="&keywords&"&zihao="&zihao&"&PageNo="&NextPage&"' class='aapply'>下一页</a>"
else
response.write" 下一页"
end if
%>
<a href="javascript:history.go(-1)" class="aapply">返 回</a> </td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1"></td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</div>
<!--#include file="close.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -