标题: 分页问题 [打印本页] 作者: 飞.逝﹏.. 时间: 2010-1-14 02:21 标题: 分页问题 现在这段代码能分页 但是他所分出的页和我数据库里的内容不一样 错在那了 应该怎么改啊 兄弟们！！！
<!--#include file="conn.asp"-->
<%
set ztrs=server.CreateObject("adodb.recordset")
ztrs.open"select * from zhutlq",conn,1,1
page=request("page")
ztrs.pagesize=3
if page="" or page<1 then
page=1
else
page=cint(page)
end if
if page>ztrs.pagecount then
page=ztrs.pagecount
else
page=cint(page)
end if
if not ztrs.eof then
ztrs.absolutepage=page
for i=1 to ztrs.pagesize
if ztrs.eof then exit for
next %>
<tr>
<td width="83" height="30" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="83" height="30" valign="top"><%=ztrs("status")%></td>
</tr>
</table></td>
<td width="560" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="560" height="30" valign="top"><a href='tlq.asp?boardid=<%=ztrs("boardid")%>'><%=ztrs("tlqname")%></a></td>
</tr>
</table></td>
<td width="137" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="137" height="30" valign="top"><%=ztrs("post")%></td>
</tr>
</table></td>
</tr>
<%
ztrs.movenext
end if
ztrs.close
set ztrs=nothing
%>作者: →大虾米々 时间: 2010-1-14 02:21
有人知道吗，可以指点一下吗，谢谢了作者: →大虾米々 时间: 2010-1-14 02:21
for i=1 to ztrs.pagesize
这个for循环的next在哪？作者: Kdsffsd 时间: 2010-1-14 02:22
for i=1 to ztrs.pagesize
if ztrs.eof then exit for
next
你说的是这个NEXT吗，如果不是，应该在哪加上？？还有别的问题吗？？？作者: ＱＱ糖 时间: 2010-1-14 02:22
for i=1 to ztrs.pagesize
if ztrs.eof then exit for
next
你说的是这个NEXT吗，如果不是，应该在哪加上？？还有别的问题吗？？？
哪这个Next的位置不对应该在
<%
ztrs.movenext
next
这个位置是正确的作者: Nick 时间: 2010-1-14 02:22
<!--#include file="conn.asp"-->
<%
set ztrs=server.CreateObject("adodb.recordset")
ztrs.open "select * from zhutlq",conn,1,1
page=cint(request("page"))
ztrs.pagesize=3
if page="" or page<1 then page=1
if page>ztrs.pagecount then page=ztrs.pagecount
if not ztrs.eof then
ztrs.absolutepage=page
for i=1 to ztrs.pagesize%>
<tr>
<td width="83" height="30" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="83" height="30" valign="top"><%=ztrs("status")%></td>
</tr>
</table></td>
<td width="560" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="560" height="30" valign="top"><a href='tlq.asp?boardid=<%=ztrs("boardid")%>'><%=ztrs("tlqname")%></a></td>
</tr>
</table></td>
<td width="137" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="137" height="30" valign="top"><%=ztrs("post")%></td>
</tr>
</table></td>
</tr>
<%
ztrs.movenext
if ztrs.eof then exit for
next
end if
ztrs.close
set ztrs=nothing
%>
</table>作者: 火之雄狮 时间: 2010-1-14 02:22
在for next循环中，应当把一条记录中要显示的内容显示完后，再next显示下一条记录。