分页

 分页应该是先从数据库里读出总的数据的条数。
然后定义每页显示多少条，可以分多少页。
然后再分页显示
可 以分开写也可以不分开

<%
          page = request.querystring("page")
          classid=request("classid")
          if classid = "" then
          sql = "select * from movie order by id desc"
          else
          sql = "select * from movie where category='"&classid&"' order by id desc"
          end if
          set rs=server.createobject("adodb.recordset")
          rs.open sql,conn,1,1
          if rs.eof or rs.bof then
          %>
          <p style="margin-top: 2" align=center>没有找到相关电影
          <%
          else
          rs.pagesize = "8"'每页最大显示数量
          if page = "" or page < "1" then
          page = "1"
          end if
          if rs.pagecount > "0" then
          rs.absolutepage = page'当前页码
          end if
          i = "0"
         %>
   <%
          do while not rs.eof or rs.bof
          i = i + 2
          if i > rs.pagesize then
          exit do
          end if
          %>

<p style="margin-top: 2">[第<%=page%>页/共<%=rs.pagecount%>页]
                    <%if page = "1" then%>
                    [首页] [上一页]
                    <%else%>
                    [<a href="class.asp?classid=<%=classid%>">首页</a>] [<a href="class.asp?classid=<%=classid%>&page=<%=page-1%>">上一页</a>]
                    <%end if%>
                    <%if rs.pagecount-page < 1 then%>
                    [下一页] [尾页]
                    <%else%>
                    [<a href="class.asp?classid=<%=classid%>&page=<%=page+1%>">下一页</a>]
                    [<a href="class.asp?page=<%=rs.pagecount%>&classid=<%=classid%>">尾页</a>]
                    <%end if%>