20分求这段分页代码错误的地方~谢谢!!!!
楼主therealsun()2006-12-26 11:23:32 在 Web 开发 / ASP 提问
就是显示记录的时候总少一个,比如应该是4个记录,只显示3个,这是一个每行显示3个图片,一页显示2行也就是6个记录,剩下就是分页了。求原因,谢谢各位高手,20分奉送~谢谢~
dim rs,sql,page,pages,count,pagesize,row
sql="select * from bproduc where larcode='"&id&"' order by prodnum desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
pagesize=6
count=rs.recordcount
if count/pagesize>count\pagesize then
pages=count\pagesize+1
else
pages=count\pagesize
end if
page=1
if request.querystring("page")<>"" then
page=cint(request.querystring("page"))
if page<1 then
page=1
end if
if page>pages then
page=pages
end if
rs.move (page-1)*pagesize
end if
if rs.bof and rs.eof then
response.write "<center><br><font color=red size=2>对不起,暂无新品!</font>"
else
num=2
%>
<br>
<table cellspacing=0 cellpadding=0 width="100%">
<%
do while not rs.eof and num>0
row=3
%>
<tr>
<%do while not rs.eof and row>0%>
<td width="32%" >
********* 图片代码**************
</td>
<%
rs.movenext
row=row-1
loop
%>
</tr>
<%
rs.movenext
num=num-1
loop
%>
</table>
问题点数:20、回复次数:10Top
1 楼yanjinbin0()回复于 2006-12-26 11:37:17 得分 0
do while not rs.eof and num>=0
do while not rs.eof and row>=0
改成这样就有4个显示了。Top
2 楼therealsun()回复于 2006-12-26 11:43:45 得分 0
这样不行啊,我试了一下结果是一行显示4个,一页显示3行了啊~Top
3 楼therealsun()回复于 2006-12-26 11:44:15 得分 0
求正确解答啊,高手~Top
4 楼therealsun()回复于 2006-12-26 12:00:23 得分 0
高手Top
5 楼happynet(快乐数据)回复于 2006-12-26 13:01:26 得分 0
<%
num=0
while not rs.eof and num<pagesize
row=0
%>
<tr>
<%do while not rs.eof and row<4%>
<td width="32%" >
********* 图片代码**************
</td>
<%
rs.movenext
row=row+1
wend
%>
</tr>
<%
num=num+1
wend
%>
Top
6 楼happynet(快乐数据)回复于 2006-12-26 13:01:38 得分 0
你试试这样。Top
7 楼happynet(快乐数据)回复于 2006-12-26 13:02:31 得分 10
写错了点点。
<%
num=0
while not rs.eof and num<pagesize
row=0
%>
<tr>
<%while not rs.eof and row<4%>
<td width="32%" >
********* 图片代码**************
</td>
<%
rs.movenext
row=row+1
wend
%>
</tr>
<%
num=num+1
wend
%>
Top
8 楼plought()回复于 2006-12-26 13:48:42 得分 10
检查你的循环条件。
明显是循环还没有处理最后一条记录,而结束循环的条件已经满足。Top
9 楼therealsun()回复于 2006-12-26 14:03:01 得分 0
呵呵问题已经解决,把rs.movenext
num=num-1
中的rs.movenext去掉就可以了,多了一个Top
10 楼therealsun()回复于 2006-12-26 14:08:41 得分 0
结帖~Top
网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!) |








网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)