紧急求助,翻页程序最后一页无法显示``
<% exec="select * from cpzs where lx='"&request.querystring("lx")&"'"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,3
rs.PageSize=2
pagecount=rs.PageCount
page=int(request.QueryString("page"))
if page<=0 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.AbsolutePage=page
%>
<%for i=1 to rs.PageSize%>
<%if rs.EOF then
exit for
end if%>
......................................................
<%
rs.movenext
next
%>
<%if page=1 and not page=pagecount then%>
<div align="right">第<%=page%>页 <%for i=1 to pagecount%>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=i%>"><%=i%></a> <%next%><a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=page+1%>">下一页</a> </div>
<%elseif page=pagecount and not page=1 then%>
<div align="right">第<%=page%>页 <%for i=1 to pagecount%>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=i%>"><%=i%></a> <%next%><a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=page-1%>">上一页</a> </div>
<%elseif page<1 then%><div class="font" align="right"><font color=red>没有任何记录!</font></div>
<%elseif page>pagecount then%><div class="font" align="right"><font color=red>没有任何记录!</font></div>
<%elseif page=1 and page=pagecount then%>
<%else%>
<div align="right">第<%=page%>页 <%for i=1 to pagecount%>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=i%>"><%=i%></a> <%next%><a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=page-1%>">上一页</a>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=page+1%>">下一页</a> </div>
<%end if%>
请各位帮忙看一下,为什么我这个翻页程序最后一页无法显示,前几页就可以,高手帮忙看看哪里错了