'为什么pagesize这个东西不起作用?  执行时,系统会把所有的记录都放在一页里面,请问怎样解决?

ymlazy16 2004-04-14 10:29:21

'为什么pagesize这个东西不起作用?  执行时,系统会把所有的记录都放在一页里面,请问怎样解决?
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>Make use of the "connection " object to execute the "select " sentence </title>



</head>




<body>

<div align="left">
<%
set cnndb=server.createobject("adodb.connection")
strcon="Provider=Microsoft.Jet.OLEDB.4.0;" & "data source=" & server.MapPath("dm.mdb")
cnndb.open strcon
set rstobj=server.createobject("adodb.recordset")
strsql="select * from 1"
rstobj.open strsql ,cnndb,3
rstobj.pagesize=2 '为什么pagesize这个东西不起作用?
rstobj.absolutepage=2
%>
</div>
<table align="center" bgcolor="blue">
<tr bgcolor="yellow">
<td>riddle</td><td>riddle tips</td><td>answer to riddle</td>
</tr>
<%
do while not rstobj.eof
%>
<tr>
<td><%=rstobj("riddle")%></td><td><%=rstobj("tips")%></td><td><%=rstobj("answer")%></td>
</tr>
<%
rstobj.movenext
loop
rstobj.close
cnndb.close
%>
</table>
</body>
</html>
...全文
22 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
tlane 2004-04-14
最好是加上判断:

currentpage = request("page") 'currentpage:当前页
If currentpage <> "" then
currentpage = cint(currentpage)
if currentpage < 1 then
currentpage = 1
else
currentpage = 1
end if

rstobj.pagesize=2
rstobj.absolutepage=2
rowcount=rstobj.pagesize

记录显示:
<% while not rs.eof and rowcount > 0%>
………
………
<%
rowcount=rowcount-1
rs.MoveNext
wend
%>
回复
bybee 2004-04-14
同意 jakieliu(边城浪子)
回复
zl13 2004-04-14
没有判断page = ""的时候,if page = "" then page = 1
回复
jakieliu 2004-04-14
<%
m=0
do while not rstobj.eof and m<rstobj.pagesize'关键
rstobj.movenext
m=m+1
loop
%>
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2004-04-14 10:29
社区公告
暂无公告