如何使用ADO及DAO设置Me.RecordSet

可以使用Recordset属性指定或获取ADO Recordset或DAO Recordset对象，它们代表窗体的记录源。

当Microsoft access数据库(.mdb)，并且在Microsoft Access项目(.adp)。
对于使用Visual Basic且已设置了Recordset属性的窗体，其读/写行为取决于记录集的类型(ADO或DAO)以及包含在带有属性标识的记录集中的数据类型(Jet或SQL)。

在MDB里，默认是我。记录集是DAO。记录集类型
如
dimrs as Dao . recordset
set RS = currentdb . open recordset(" tbluserofficecn ")
set me . recordset = RS。

如果要用ADODB。记录集，可以使用下面的方法。
添加代码
d global rst suppliers as ADODB . recordset
submakerw()
Form _ Open Form " suppliers "
Set rst suppliers = New ADODB。记录集
rstSuppliers。cursor location = adus client
rst suppliers。打开“从供应商中选择”,当前项目。Connection、adOpenKeyset、adLockOptimistic
集表单(“供应商”)。Recordset = rstSuppliers
表单(“供应商”)。unique table = " Suppliers "
End Sub

注意属性ADO记录集。CursorLocation必须设置为adUseClient。
在属性表上，UniqueTable属性可用于客户端/服务器模式，但不能用于access数据库(。mdb)。该属性只能在Visual Basic代码中设置。

可以使用Recordset属性执行下列操作:

1)将多个表单连接到一个公共数据集中。这种情况允许同步多个表单。

例:
套我。记录集=表单！1.记录集
2)在记录集对象上使用表单不直接支持的方法。
例如，当您希望使用自定义对话框通过ADO的Find方法或DAO的Find方法来查找记录时，可以使用Recordset属性。

3)环绕一系列影响多个表单编辑的事务(可以重做)。

当您打开一个新的Recordset对象时，它的第一条记录就是当前记录。

注意:如果更改窗体的RecordSource属性，必须使用Set语句。更改窗体的Recordset属性也可能会更改RecordSource、RecordsetType和RecordLocks属性。同时，一些相关的数据属性可能会被覆盖；示例:Filter、FilterOn、OrderBy和OrderByOn属性。