主题:  小弟又来打扰!!有个很急的问题问大家

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
#12004/8/25 11:50:12
小弟有这样一个代码:
<%dim i
i=0 %>
<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH="100%">
<% do while not rs.Eof
         %>
<tr valign="top">
<td colspan="3" background="images/hor.gif" border="0"></td>
</tr>
<TR>
<TD> <table cellspacing=0 cellpadding=0 width="100%">
<tr>
<td>&nbsp;</td>
</tr>
<%rs.movenext%>
</table></TD>
<td width="1" background="images/ver.gif" border="0"></td>
<TD VALIGN=top>
<%If Not Rs.Eof Then %>
<TABLE WIDTH="37%" CELLPADDING=0 CELLSPACING=0>
<TR>
<TD >&nbsp;</TD>
</TR>
</TABLE>
<%end if%></TD>
</TR>
<%
            i=i+1
            if i>MaxPerPage then Exit Do
            
            
            rs.close
            set rs=nothing
            loop
            %>
</TABLE>

其中的" MaxPerPage "为定义的每页最大在显示的数量,分页没有问题.
现在显示错误.
如何更改?????



蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
#22004/8/25 16:58:47
你的代码可改为：
<%
dim i
i=0
%>
<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH="100%">
<% do while not rs.Eof%>
<tr valign="top">
<td colspan="3" background="images/hor.gif" border="0"></td>
</tr>
<TR>
<TD> <table cellspacing=0 cellpadding=0 width="100%">
<tr>
<td>&nbsp;</td>
</tr>
</table></TD>
<td width="1" background="images/ver.gif" border="0"></td>
<TD VALIGN=top>

<%rs.movenext%>
<%If Not Rs.Eof Then %>
<TABLE WIDTH="37%" CELLPADDING=0 CELLSPACING=0>
<TR>
<TD >&nbsp;</TD>
</TR>
</TABLE>
<%end if%>

</TD>
</TR>
<%
i=i+1

if i>MaxPerPage then
Exit Do
rs.close
set rs=nothing '你的代码提前关闭rs，所以在下一循环后出错
end if

loop
%>
</TABLE>

另外不知你为什么要这样写代码，仅为了测试？？可以用rs的Page功能。


非常大鱼

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
#32004/8/26 17:55:03
感谢!
不过不对,出现内部错误!



蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
#42004/8/26 19:54:42
试试以下：
<%
for i = 0 to MaxPerPage -1
if rs.eof then exit for
%>
.......
<%
rs.MoveNext()
if not rs.eof then
%>
......
<% end if %>

<% next %>

<%
rs.close()
set rs = nothing
%>

上楼代码想不出为什么会错，是否是其它原因，可简化代码调试。


非常大鱼

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
#52004/8/27 10:50:09
楼上的大哥,有对了,但是还有一个问题出现:
在第一个循环中最后的表格内容会在第二个循环中第一个出现,出现重复.即:
1,2
2,3
3,4

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
#62004/8/27 12:33:11
谢谢各位啦!在大家的帮助下,我已经搞定这个问题,非常不好意思麻烦大家!!