如何在Rs 中读另一个Rs中的某一确定行的方法?原码如下.

Question

Dim Rs as new ADODB.Recordset
Dim RsTmp as new Adodb.Recordset
Rs.open "select * from ObjTable ",adoCon,....,....
 debug.print rs.Recordcount  => 20(有二十个记录)
问题来了:如何把 Rs 中的5,7,9 行数据送入RsTmp 里,
这问题菜吧:( 不过我还是不知道.哪位高人出来说说.不胜感激!

Answer 1

首先要知道你的表所定义的第5,7,9行是根据哪个字段排序的，如定位第5条记录可以
Rs.open "select top 5 * from ObjTable order by 排序字段 [desc]",adoCon,....,....
则rs的第一条记录就是你要的原表第五条记录(注意排序是升序还是降序)

Answer 2

用recordset的属性AbsolutePosition 指定纪录的当前位置。
rd.AbsolutePosition =5
就可以得到当前的数据了，加到另一个记录集就容易了

Answer 3

使用 AbsolutePosition 指定紀錄的當前位置:
如:
rsAdo.AbsolutePosition = 5
debug.print rsAdo.Fields(0).Value

Answer 4

各位大哥，如何把指定行送入另一个rs里这才事令我头痛的问题
如: 
rsAdo.AbsolutePosition =5
rsTmp.什么方法能得到RsAdo里的整个一行的数据呢？就是得到绝对位置等于5的那一行？