vb6 怎样往recordset 里加已经存在的记录

Question

例如

 

Dim rs as new recordset

rs.open " select * from table1 where field1=1",cn,adOpenDynamic, adLockOptimistic, adCmdText

 

然后我要再把table1 里的 field2=1 的所有记录加到rs 里去。

 

请问应该怎么写。

 

 

 

Answer 1

set rs = new recordset

rs.open " select * from table1 where field1=1 or field2=1",cn,adOpenDynamic, adLockOptimistic, adCmdText

Answer 2

谢谢。

 

但是我的前提是rs已经有东西了， 然后再加进去。

 

因为我加进rs 的记录的条件是动态的。 所以必须分开加。 您的方法每次只能固定的给rs 加记录。

Answer 3

 

加纪录和查询条件没关

Answer 4

 

那我应该怎么写？

 

就是第一步先把 满足field1=1 的记录加到rs 里去，第二步 把 满足field2=2 的记录加到rs 里去。分开来实现， 第二步应该怎么写？用INSERT 么？

 

小可是新手，麻烦具体点， 谢谢斑竹了。

Answer 5

 

rs.addnew

rs!field1=1

rs.update

 

 

rs.addnew

rs!field1=2

rs.update

Answer 6

谢谢， 不过版主似乎误解我的意思。我是要把已经存在的记录加到rs 里， 不是新建记录。

Answer 7

Dim rs as new recordset

rs.open " select * from table1 ",cn,adOpenDynamic, adLockOptimistic, adCmdText

 

'field1=1 的所有记录

rs.filter="field1=1"

'field2=1 的所有记录

rs.filter="field2=1"