求援!!关于asp与sybase11进行分页的错误
本人最近用asp+sybase11读数据时居然发现不能分页,好像是不支持ADO的分页方法和属性。不管插入多少条记录,用rs.recordcount总是返回-1,而数据却能读出来,并且一用rs.absolutepage这个属性就出错,但我一改为sqlserver连接时,都很正常数据库是一模一样的,请各位大侠多多指点,不胜感激!!! 问题点数:100、回复次数:5Top
1 楼cpp2017(慕白兄)回复于 2003-06-04 10:06:54 得分 0
代码看看
Top
2 楼xinyue78(爱上雪)回复于 2003-06-04 10:19:41 得分 0
sqlDept = "SELECT *,count(*) as counts FROM deptment"
sqlDept = sqlDept + " order by dpname"
Set rsDept = Server.CreateObject("ADODB.Recordset")
rsDept.CursorType = adOpenStatic
rsDept.PageSize = intPageSize
rsDept.Open sqlDept,Conn
If rsDept.EOF Then
if keyword="" then
result=""
else
result="符合<font color=red>"&keyword&"</font>的"
end if
Response.Write "<p align=center>暂时无"&result&"记录</p>"
Response.Write "<p align=center>您现在可以" & "<a href='" & "addDeptment.asp" & "'>添加</a></p>"
Else
counts=rsDept("counts")
intPageCount = int(counts/intpagesize)+1
If sPage=0 Then
sPage=1
rsDept.AbsolutePage=1
Elseif sPage > intPageCount Then
rsDept.AbsolutePage=intPageCount
currentPage = intPageCount
Else
'rsDept.absolutePage=sPage
currentPage = sPage
End IfTop
3 楼cpp2017(慕白兄)回复于 2003-06-04 10:21:49 得分 100
Set rsDept = Server.CreateObject("ADODB.Recordset")
rsDept.CursorType = adOpenStatic
rsDept.PageSize = intPageSize
rsDept.Open sqlDept,Conn
==>
Set rsDept = Server.CreateObject("ADODB.Recordset")
rsDept.Open sqlDept,Conn,3,3
rsDept.PageSize = intPageSize
Top
4 楼xinyue78(爱上雪)回复于 2003-06-04 10:22:59 得分 0
部分代码,多多指教,用rsDept.recordcount统计不出,我就用count(*),但是rsDept.absoulutepage总是报错,rsDept.absoulutepage=1,这样也错记录可以读在sqlserver下也很正常!Top
5 楼xinyue78(爱上雪)回复于 2003-06-04 10:28:23 得分 0
没用啊,rsDept.absoulutepage这个还是报错,它可能是sybase11本身的问题,sqlserver下很正常Top




