asp 分页时首页显示了全部数据

[bernard989]

大家好 今天写了一个分页代码，但是数据显示有问题。比如说总数据有25个，每页显示5个。但是现在首页显示25个，第二页20个。。。最后一页5个。下面是代码，请大家帮忙看一下怎么解决，谢谢。因为是新人，所以如果有什么不对的地方，敬请指正。

dim conn
morefilename="wcdj_list.asp"
sql="SELECT DW_MC, YHM, WCRQ_Q, WCRQ_Z, WCSY FROM WCDJ order by WCRQ_Q desc"

rs.open sql,conn,1,3

if rs.eof then
response.Write "没有查找到相关信息。</td></table>"
else
dim totalPut '获取记录总数目
dim currentPage '当前页面
dim totalPages '获取分页数目

rs.pagesize=5 '设置每页数量
totalPut=rs.recordcount ’总记录数
totalPages=rs.pagecount ’总页数
rs.movefirst
currentpage=cint(request("page"))

if currentpage&"x"="x" then '处理页码为空时的情况
currentpage=1
end if

if currentpage<1 then ’处理数据异常
currentpage=1
end if

if currentpage>totalpages then
currentpage=totalpages
end if
rs.absolutepage=currentpage


response.write "<p align='center'> "
filenameB=morefilename
response.write "<font color='#000080'><a href="&filenameB&">全部信息</a> "
if CurrentPage<2 then
response.write "<font color='#000080'>首页 上一页</font> "
else
filenameB=morefilename & "?page=1"
response.write "<a href="&filenameB&">首页</a> "
filenameB=morefilename & "?page=" ¤tPage-1
response.write "<a href="&filenameB&">上一页</a> "
end if
if totalPages-currentpage<1 then
response.write "<font color='#000080'>下一页 尾页</font>"
else
filenameB=morefilename & "?page=" & CurrentPage+1
response.write "<a href="&filenameb&">下一页</a> "
filenameB=morefilename & "?page=" & totalPages
response.write "<a href="&filenameB&">尾页</a>"
end if
response.write "<font color='#000080'> 页次：</font><strong><font color=red>"¤tPage&"</font><font color='#000080'>/"&totalpages&"</strong>页</font> "
response.write "<font color='#000080'> 共<b>"&totalput&"</b>个信息 <b>"&rs.pagesize&"</b>个信息/页</font> "

end if

do while (not rs.eof)

[bernard989]

我看别人关于分页的代码里面有 i=1 do while not rs.eof and i<rs.pagesize i=i+1 rs.movenext 这样的语句，跟我的问题相关吗？

[KeepSayingNo]

说白了这个分页就是在页面上按照页号和每页的总的呈现数量去取数据，然后呈现。不会出现你那样的问题啊。

[bernard989]

引用 2 楼 dotnetstudio 的回复:

说白了这个分页就是在页面上按照页号和每页的总的呈现数量去取数据，然后呈现。不会出现你那样的问题啊。

谢谢楼上回复，但是我这代码确实出现这个问题了，我再找找问题

[bernard989]

我弄好了，关键是最后一句话do while (not rs.eof),这里要先设置一个参数来控制显示的，将条件改成do while (not rs.eof and i<rs.pagesize)就可以了