asp分页

pagesize:一页的在记录大小     absulotepage:换页时,指针指到每一页的第一条记录     PageCount:按之前提供的pagesize分页规则,所有记录应该分几页     如：     RS.AbsolutePage=session("currentpage")'当前是哪一页     pagesize=20   每页显示二十个记录     PageCount　总共多少页数据库不同只是改连接串就可以了,和代码没有关系的     我也给一个分页的代码~     <%     page=Request("page")'当前页         if   page=0   or   page=""   then               page=1         end   if             '取得记录数         RecordCount   =   0           do   while   not   rs.Eof             RecordCount   =   RecordCount   +1                   rs.MoveNext           loop         if   not   RecordCount=0   then               rs.MoveFirst         end   if             '取得总页数             pageCount=RecordCount/10         pageCount=int(pageCount)     if   (RecordCount   mod   10)>0   then               PageCount=PageCount   +1         end   if       %>             <%   if   not   rs.eof   then           rs.movefirst               '将记录取到当前页           do   while   pos<(page-1)*10               pos=pos+1               rs.MoveNext           loop               i=0           x=0           '显示记录每页10条(x)           do   while   x<10   and   not   rs.eof     %>                   <tr><td><%'记录字段%></td></tr>         <%   i=i+1           x=x+1           rs.movenext           loop           rs.close           end   if     %>           <%       '列出页码       response.write   "页码:"         y=1       do   while   y<pagecount+1             response.write   "<a   href='页.asp?page="   &y&  "'>["&y&"]</a>"                                                                                                         y=y+1                                                                              loop%>