分页啊，分页。当前页可以显示，但是点击“上一页”“下一页”，时，就为空了
主要代码如下：
<!--#include file=database/conn.asp-->
<!--#include file=connfig.asp-->
<!--#include file=inc/yan.asp-->
<%
set rs=server.createobject( "adodb.recordset ")
if session( "admin_name ")= "Admin " or session( "admin_name ")= "admin " then
sql= "select * from dailyreport where Tdate= ' "&request( "sdate ")& " ' order by date desc "
end if
if session( "admin_name ")= "Jy " or session( "admin_name ")= "jy " then
sql= "select * from dailyreport where username in (select username from users where name in (select name from renshi where bumen= '軟體課 ')) and Tdate= ' "&request( "sdate ")& " ' order by date desc "
end if
rs.open sql,conn,1,1
%>
。。。。。。。
<body>
<table width= "585 " height= "175 " border= "0 " align= "center " cellspacing= "1 " bgcolor= "#336699 " style= "table-layout:fixed;word-break:break-all ">
<tr bgcolor= "#FF9900 ">
<td height= "77 " colspan= "6 "> <div align= "center " class= "style1 style4 "> 工作日報表 </div> </td>
</tr> <tr>
<td width= "15% " height= "33 " background= "images/tile_sub.gif "> <div align= "center " class= "style3 "> 日期 </div> </td>
<td width= "15% " background= "images/tile_sub.gif "> <div align= "center " class= "style3 "> 員工姓名 </div> </td>
<td width= "40% " background= "images/tile_sub.gif "> <div align= "center " class= "style3 "> 工作內容 </div> </td>
<td width= "14% " background= "images/tile_sub.gif "> <div align= "center " class= "style3 "> 離開時間 </div>
<div align= "center " class= "style3 "> </div> </td>
<td width= "16% " colspan= "2 " background= "images/tile_sub.gif "> <div align= "center " class= "style3 "> 管理 </div> </td>
</tr>
<%
if not rs.eof then
zong=rs.recordcount
shownum=2
rs.pagesize=shownum
maxpage=rs.pagecount
requestpage=clng(request( "p "))
if requestpage= " " or requestpage=0 then
requestpage=1
end if
if requestpage> maxpage then
requestpage=maxpage
end if
if requestpage <> 1 then
rs.move (requestpage-1)*rs.pagesize
end if
for i=1 to rs.pagesize and not rs.eof
%>
<tr>
<td height= "30 " bgcolor= "#FFFFFF "> <div align= "center "> <%=rs( "Tdate ")%> </div> </td>
<td bgcolor= "#FFFFFF "> <div align= "center "> <%= rs( "username ") %> </div> </td>
<td bgcolor= "#FFFFFF "> <div align= "center "> <%= rs( "writeup ") %> </div> </td>
<td bgcolor= "#FFFFFF "> <div align= "center "> <%=rs( "leavetime_hour ")%> : <%=rs( "leavetime_minute ")%> </div> </td>
<td width= "58 " bgcolor= "#FFFFFF "> <div align= "center "> <a href= "riup.asp?id= <%=rs( "id ")%> "> 查看 </a> </div> </td>
<td width= "62 " bgcolor= "#FFFFFF "> <div align= "center "> <a href= "ri.asp?del= <%=rs( "id ")%> &p= <%=requestpage%> "> 刪除 </a> </div> </td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
else
response.Write( "暫無信息 ")
end if
%>
<tr bgcolor= "#FFFF00 ">
<td height= "30 " colspan= "6 "> <table width= "100% " border= "0 ">
<tr>
<td height= "24 " width= "17% " > <div align= "left " > 共有信息 <%response.write rs.recordcount%> 條 </div>
<td width= "9% "> 【 <a href=javascript:window.print();> 打印 </a> 】 </td>
<td width= "74% "> <div align= "right "> 【第 <%=requestpage%> / <%=maxpage%> 頁】
【 <a href=ri.asp?p=1&year= <%=request( "year ")%> &month= <%=request( "month ")%> &day= <%=request( "day ")%> > 第一頁 </a> 】【 <a href=ri.asp?p= <%=requestpage-1%> &year= <%=request( "year ")%> &month= <%=request( "month ")%> &day= <%=request( "day ")%> > 上一頁 </a> 】
【 <a href=ri.asp?p= <%=requestpage+1%> &year= <%=request( "year ")%> &month= <%=request( "month ")%> &day= <%=request( "day ")%> > 下一頁 </a> 】
【 <a href=ri.asp?p= <%=maxpage%> &year= <%=request( "year ")%> &month= <%=request( "month ")%> &day= <%=request( "day ")%> > 最後一頁 </a> 】 </div> </td>
</tr>
</table> </td>
</tr>
</table>
</body>
</html>
。。
结果只能显示当前页，如果点击“第一页”“上一页”“下一页”“最后一页”，表格无内容，这是为什么？
[解决办法]
if requestpage> maxpage then
requestpage=maxpage
end if
if requestpage <> 1 then
rs.move (requestpage-1)*rs.pagesize
end if
改为
if requestpage> maxpage then
requestpage=maxpage
end if
rs.absolutepage=requestpage
[解决办法]
request( "sdate ")由这个值看，
你的分页超链接应该加上& "&sdate= "&request( "sdate ")
