asp分页不成功？请帮忙

[ly83522]

我用想用分页的方法来产生产品的列表,分页倒是成功了,但是用来显示分页的数目的语句却怎么也实现不了,用了response.write rs.PageCount来测试分了多少页,却显示-1,这是怎么回事?分页都成功了,但却分了-1页?部分代码如下:
<%


Set dbs = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
dbs.Open "driver={Microsoft Access Driver (*.mdb)};pwd=pw;dbq=" & server.MapPath("Pd.mdb")
rs.cursortype=adopenstatic



Set rs = dbs.Execute("Select * From ppp")


rs.PageSize = 5
%>
………………
<%
IF rs.pagecount>1 THEN
%>
<font color="darkgreen"> <b>Go to page: </b>
<%
FOR i = 1 to rs.PageCount

%>
<a href="default.asp?cat=<%=cat%>&pg=<%=i%>"> <%=i%></a> 


<%
NEXT
%>
</font>
<%
END IF
%>

………………

[手艺人杨柳]

Set rs = dbs.Execute("Select * From ppp")
换成：
sqlstr="Select * From ppp"
rs.open sqlstr,dbs,1,1

[cqfeng]

select count(*) as cnt from tableName
rs("cnt")为总数

你可以试试rs.open sql,conn,1,1或者3，1的写法

[jacklinchen]

Set rs = dbs.Execute("Select * From ppp")
改成
set rs=server.createObject("adodb.recordset")
sql="Select * From ppp"
rs.cursorlocation=3
rs.open sql,conn,1,3
试试

[许留心]

你的这一句：
rs.cursortype=adopenstatic
Set rs = dbs.Execute("Select * From ppp")
有错。使用rs.PageCount，应该使用动态游标，而dbs.Execute默认的游标为前向的，你应该的页面前包含adovbs.inc这个文件，然后采用
set rs=server.createObject("adodb.recordset")
sql="Select * From ppp"
rs.cursorlocation=3
rs.open sql,conn,1,3
方式得到记录集。这样rs.recordcount等属性有可以用了。

祝你成功！