最简单的分页显示程序- ASP教程-

分页：
   <%
     rs.pagesize=20
     if rs.eof then
     rs_total=0
     else 
     rs_total=rs.recordcount
     end if

     if request("pageno")="" then
     pageno=1
     else pageno=clng(request("pageno"))
     end if

     if not rs.eof then
     rs.absolutepage=pageno
     end if
   %>

翻页：
 <%if pageno<>1  then%>
 <a href="?pageno=1&类别=<%=lb%>">第一页</a>   
 <a href="?pageno=<%=(pageno-1)%>&类别=<%=lb%>">上一页</a>   
 <%else%>
 第一页   前一页   
 <%end if%>
   <%if pageno<>rs.pagecount then%>
 <a href="?pageno=<%=(pageno+1)%>&类别=<%=lb%>">下一页</a>   
 <a href="?pageno=<%=rs.pagecount%>&类别=<%=lb%>">最后一页</a>
 <%else%>
 下一页   最后一页
 <%end if%>       
 共<%=rs_total%>条记录    
 <%=pageno%>/<%=rs.pagecount%>页