分页问题 - ASP - 新微赢技术网

飞.逝﹏..

电梯直达

1^#

发表于 2010-1-14 02:21:48 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

现在这段代码能分页但是他所分出的页和我数据库里的内容不一样错在那了应该怎么改啊兄弟们！！！

<%
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">

<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">

<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">

<tr>
<td width="137" height="30" valign="top"><%=ztrs("post")%></td>
</tr>
</table></td>
</tr>
<%
ztrs.movenext
end if
ztrs.close
set ztrs=nothing
%>

收藏0

使用道具举报

→大虾米々

2^#

发表于 2010-1-14 02:21:52 | 只看该作者

有人知道吗，可以指点一下吗，谢谢了

回复支持反对

使用道具举报

→大虾米々

3^#

发表于 2010-1-14 02:21:56 | 只看该作者

for i=1 to ztrs.pagesize
这个for循环的next在哪？

回复支持反对

使用道具举报

Kdsffsd

4^#

发表于 2010-1-14 02:22:00 | 只看该作者

for i=1 to ztrs.pagesize
if ztrs.eof then exit for
next
你说的是这个NEXT吗，如果不是，应该在哪加上？？还有别的问题吗？？？

回复支持反对

使用道具举报

ＱＱ糖

5^#

发表于 2010-1-14 02:22:03 | 只看该作者

for i=1 to ztrs.pagesize
if ztrs.eof then exit for
next
你说的是这个NEXT吗，如果不是，应该在哪加上？？还有别的问题吗？？？
哪这个Next的位置不对应该在
<%
ztrs.movenext
next
这个位置是正确的

回复支持反对

使用道具举报

Nick

6^#

发表于 2010-1-14 02:22:07 | 只看该作者

<%
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">

<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">

<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">

<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>

回复支持反对

使用道具举报

火之雄狮

7^#

发表于 2010-1-14 02:22:11 | 只看该作者

在for next循环中，应当把一条记录中要显示的内容显示完后，再next显示下一条记录。

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册