关于AbsolutePage
我的程序总是在“rst.AbsolutePage=intCur”处报错请高手帮忙看看!
num=request.form("No")
set conn=server.createobject("adodb.connection")
conn.open "sbgl"
set rst=server.createobject("adodb.recordset")
rst.CursorLocation=1
rst.CursorType=adopenstatic
rst.CacheSize=intpagesize
strNo="select * from equipment where equipment_No='"& num &"'"
rst.open strNo,conn
rst.pagesize=intpagesize
if not rst.eof then
rst.AbsolutePage=intCur
end if
inttotal=rst.PageCount
问题点数:60、回复次数:9Top
1 楼fbj007(千里独行)回复于 2002-08-23 18:12:24 得分 0
intCur的数据类型是什么,看看,要整数型的Top
2 楼tdl982324(最爱宝宝的笨熊)回复于 2002-08-23 18:12:29 得分 20
rst.open strNo,conn,1,1
要加上游标类型和锁类型,否则不支持recordcount,absolutepage等属性
具体如下,第一个1是游标,第二个是锁
'定义数据库连接的一些常量
Const adOpenForwardOnly = 0 '游标只向前浏览记录,不支持分页、Recordset、BookMark
Const adOpenKeyset = 1 '键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
Const adOpenDynamic = 2 '动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
Const adOpenStatic = 3 '静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动
Const adLockReadOnly = 1 '锁定类型,默认的,只读,不能作任何修改
Const adLockPessimistic = 2 '当编辑时立即锁定记录,最安全的方式
Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等
Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的
Top
3 楼freezwy(网络自由人)回复于 2002-08-23 18:14:12 得分 40
if not rs.eof then
rs.PageSize=10
count=rs.PageSize
if request("CurrentPage")="" then
rs.AbsolutePage=1
CurrentPage=1
else
rs.AbsolutePage=request("CurrentPage")
CurrentPage=Cint(request("CurrentPage"))
end if
PageCount=rs.PageCount
Top
4 楼cross311()回复于 2002-08-23 18:16:37 得分 0
关注Top
5 楼StepBoy(步步高)回复于 2002-08-23 18:44:22 得分 0
把数据全部转换就可以了。Top
6 楼LONGFOR(雪婷)回复于 2002-08-23 18:50:11 得分 0
請問一下tdl982324(石井堅),
rst.open strNo,conn,1,1 不能寫成rst.open strNo,conn,3,1嗎Top
7 楼baisun(蟋蟀.NET)回复于 2002-08-23 20:33:42 得分 0
tdl982324(石井坚) ,对于你说的,举其中一个,
Const adOpenKeyset = 1 '键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。
是什么意思?难道是比如:我正在看留言本时,其他人也在操作,如果那个人添加了一条留言,是不是我就无法看到? 是这个意思吗?谢谢Top
8 楼ehom(?!)回复于 2002-08-23 21:44:52 得分 0
都没说到问题所在
楼主已经指定了游标类型
将rst.CursorType=adopenstatic改为rst.CursorType=3
因为没有include ADOVBS.INC,所以只能用数字!Top
9 楼ehom(?!)回复于 2002-08-23 21:46:48 得分 0
至于是用1,2还是3,要根据具体情况决定!只要不是0就可!Top




