简单的记录分页问题!!急用!!在线等待!!!

foxhuan 2002-03-25 01:50:17
http://www.5djk.com/free/fgs/index.asp?user=foxhuan
请问做这样的留言板记录分页,要用到recordset的哪些属性??
.pagesize是什么意思??其它的呢??
...全文
53 点赞 收藏 24
写回复
24 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
foxhuan 2002-04-01
to tripofdream:成功了!!!!!:)
太感动了!!这可是毕业设计啊~~~~~~~~~~~~~~终于解决它了。
对你感激涕零…………
回复
tripofdream 2002-04-01
然后再用
rs.absolutepage=c_page
回复
tripofdream 2002-04-01
第一页由于没有传入page,request.querystring("page")为空,rs.absolutepage="",所以出错.正确的做法是做一下判断:
dim c_page
if request.querystring("page")="" then
c_page=1
else
c_page=cint(request.querystring("page"))
end if
另外c_page的值不能小于1,不能大于rs.pagecount:
if c_page<1 then c_page=1
if c_page>rs.pagecount then c_page=rs.pagecount
回复
foxhuan 2002-04-01
to tripofdream:错误码为(0x800A0BB9)
回复
tripofdream 2002-04-01
错误码是多少?
回复
foxhuan 2002-03-31
to tripofdream:调试后说是adodb.recordset错误。错在rs.absolutepage=request.querystring("page")
for i=1 to intpagesize?????????????????

这个部分:(
回复
foxhuan 2002-03-31
to tripofdream:啊~~~~~~~~~原来这么回事啊:0555555555我去试试。
回复
foxhuan 2002-03-30
to tripofdream:我改了那句。可又出现其它的错误:说是adodb.recordset错误。错在打问号的那行。代码如下:
<%
const intpagesize=15
dim pages
set cn=server.createobject("adodb.connection")
cn.open "dsn=customer0"
sql="select * from gb"
set rs=cn.execute(sql)
rs.pagesize=intpagesize
pages=rs.pagecount
%>
<html>
.
.
.
<%
dim i
rs.absolutepage=request.querystring("page")
for i=1 to intpagesize?????????????????
if rs.eof then
exit for
end if
%>
.
.
昵称:<%=rs("name")%>
E-mail:<%=rs("email")%>
个人主页:<%=rs("homepage")%>
留言:<%=rs("say")%>
.
.
.
<%
rs.movenext
next
cn.close
%>
<%
dim p
if pages<0 then
pages=1
end if
for p=1 to pages
response.write "<a href='link/gb.asp?page="&p&"'>"&"["&p&"]"&"</a>"
next
%>
</body>
</html>
回复
tripofdream 2002-03-30
呵呵,我又写错了,不好意思
set rs=server.createobject("adodb.recordset")
建议你找本书看一下recordset的用法,以免被我误导 :P
回复
foxhuan 2002-03-30
to tripofdream:我的代码改为:
<%
const intpagesize=15
dim pages
set cn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.connection")
cn.open "dsn=customer0"
sql="select * from gb"
rs.open sql,cn,3,1
rs.pagesize=intpagesize????????????????????
pages=rs.pagecount
%>
调试时却说打句号的那句有错误。错在哪里呢????
回复
foxhuan 2002-03-30
to tripofdream:太好了。:)我去谢谢!!非常感谢你!!!大恩大德~~~~~
回复
tripofdream 2002-03-30
错误应该是在你标识的那一行的上一行.
如果要分页显示,就不能使用execute方法来获得记录集,因为这种记录集使用的是向前游标(forward only),不能使用pageCount,absolutePage等属性;而应该用open方法来打开记录集:
set cn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.connection")
cn.open "dsn=customer0"
sql="select * from gb"
rs.open sql,cn,3,1
回复
tripofdream 2002-03-26
不要括号,同时注意双引号要用单引号或两个双引号代替
response.write "<a href=""gb.asp?page="&p&""">"&"["&p&"]"&"</a>"

response.write "<a href='gb.asp?page="&p&"'>"&"["&p&"]"&"</a>"
回复
foxhuan 2002-03-26
to ssm1226:我就是不明白我写的response.write语句错在哪里。
其中pages已经赋值为rs.pagecount。
回复
foxhuan 2002-03-26
to ssm1226:那么response.write语句呢??
回复
ssm1226 2002-03-26
写出[1][2].........
str=""
for i=1 to rs.pagecount
str=str&"[" & _
"< a href=xxx.asp?pageno="&i&">"&i
"]"
next
回复
foxhuan 2002-03-25
各位,帮个忙吧。急死了!!!我只好一天后来看…
回复
foxhuan 2002-03-25
response.write("<a href="gb.asp?page='"&p&"'">"&[&'"&p&"'&]&"</a>")
改成这样也错。
那要怎么修改呢?
回复
foxhuan 2002-03-25
<%
dim p
if pages<0 then
pages=1
end if
for p=1 to pages
response.write ("<a href="gb.asp?page='"&p&"'">"&"["&p&"]"&"</a>")??????????
next
%>
以上代码实现的是页面上那[1][2][3]并可点击到留言本的功能。调试时说打问号的那句有错误。请问是什么错误,如何改正?
回复
taglis2002 2002-03-25
这问题很常见,你参考一下:
http://www.csdn.net/expert/topic/594/594192.xml?temp=2.260989E-02
回复
加载更多回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

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