标题:紧急求助,翻页程序最后一页无法显示``
只看楼主
wjzhihua1
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2005-8-15
 问题点数:0 回复次数:4 
紧急求助,翻页程序最后一页无法显示``
<%
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%>页&nbsp;&nbsp;<%for i=1 to pagecount%>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=i%>"><%=i%></a>&nbsp;<%next%><a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=page+1%>">下一页</a>&nbsp;&nbsp;</div>
<%elseif page=pagecount and not page=1 then%>
<div align="right">第<%=page%>页&nbsp;&nbsp;<%for i=1 to pagecount%>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=i%>"><%=i%></a>&nbsp;<%next%><a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=page-1%>">上一页</a>&nbsp;&nbsp;</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%>页&nbsp;&nbsp;<%for i=1 to pagecount%>
<a href="class_show.asp?lx=<%=rs("lx")%>&page=<%=i%>"><%=i%></a>&nbsp;<%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>&nbsp;&nbsp;</div>
<%end if%>
请各位帮忙看一下,为什么我这个翻页程序最后一页无法显示,前几页就可以,高手帮忙看看哪里错了
搜索更多相关主题的帖子: page request exec 
2005-11-02 14:56
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
得分:0 
控制一下page必须<=总页数
2005-11-02 15:06
wjzhihua1
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2005-8-15
得分:0 
版主能给个完整的源码吗```
2005-11-02 15:08
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
得分:0 
2005-11-02 15:26
wjzhihua1
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2005-8-15
得分:0 
F1F1F1F1F1 F1 F1
F1 F1 F1
F1 F1
F1 F1
F1 F1 F1 F1 F1
F1 F1
F1 F1
F1 F1
F1 F1
F1 F1

[此贴子已经被作者于2005-11-2 15:28:44编辑过]

2005-11-02 15:27



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-32325-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013971 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved