一个分页显示的问题
现在我在做一个分页显示的时候,结果出现的是不分页。请各位高人帮我看看。现附上源码。谢啦!
<%
mypage=request.querystring("whichpage") '// 取显示页号
if mypage=""then
mypage=1 '//当前页号
end if
if mypage=1 then
prepage=1
else
prepage=mypage-1 '// 前一页号
end if
nextpage=mypage+1 '// 下一页号
ps=6 '// 设定每页大小
mypagesize=request.querystring("pagesize")
if mypagesize=""then
mypagesize=ps '// 每页记录个数
end if
sql="select * from Category WHERE caparent=0"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,2,1
rec_all=rs.recordcount '// 取得所有记录
rs.pagesize=mypagesize
maxcount=cint(rs.pagecount)
Total=INT(RS.recordcount/mypagesize * -1)*-1 '// 取得总页数
if not rs.eof then
rs.absolutepage=mypage '// 当前页号
end if
%>
<%
sql="select * from Category where caparent=0"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
%>
<%=rs("caname")%>
<% rs.movenext
loop
rs.close%>
<%
sql="select * from Category where caparent="&rs("canum")
set rs1=server.createobject("adodb.recordset")
rs1.open sql,conn,1,1
do while not rs1.eof
%>
<%=rs1("caname")%>
<% rs1.movenext
loop
rs1.close
%>
<%
rs.movenext
loop
%>
<% scriptname=request.servervariables("script_name")%>
<a href="<%=scriptname%>?whichpage=1&pagesize=<%=mypagesize%>">第一页</a>
<a href="<%=scriptname%>?whichpage=<%=nextpage%>&pagesize=<%=mypagesize%>">下一页
</a>
<a href="<%=scriptname%>?whichpage=<%=prepage%>&pagesize=<%=mypagesize%>">上一页
</a>
<a href="<%=scriptname%>?whichpage=<%=maxcount%>&pagesize=<%=mypagesize%>">最后一页
</tr>
<% rs.close%>