一个关于窗体中RecordSet属性的问题

leewm

[B]各位Access高手：[/B]

                          小弟最近用Access正在编程，在窗体代码中，采用了ADO方式访问其他Access文件中的查询，能否将ADO方式建立的记录集赋予该窗体的Recordset属性,或相反，例如：dim rs as adodb.recordset
         set rs=me.recordset

(小弟查阅了帮助文档中的“Recordset属性“，其中就有这样的例子，都试过，均运行不通)

为什么运行不通？小弟百思不得其解，请各位高手帮忙，为盼！！！

zhuyiwen

首先弄清楚你的窗体是采用的ADO打开的记录集还是采用DAO打开的记录集。也就是说ACCESS创建窗体默认是用的那一个方法创建记录集。它的记录集类型是根据这个默认来设定的。在ACCESS联机帮助中有详细说明。

下面的代码帮助确定在不同情况下，Recordset 属性返回什么类型的记录集。

Sub CheckRSType()
    Dim rs as Object

    Set rs=Forms(0).Recordset
    If TypeOf rs Is DAO.Recordset Then
        MsgBox "DAO Recordset"
    ElseIf TypeOf rs is ADODB.Recordset Then
        MsgBox "ADO Recordset"
    End If
End Sub

leewm

上述代码是在VBA的帮助文件中的例子，试过，运行不通，且在Access中，哪里去引用DAO对象。

喳喳林

进入代码视图.

   工具(T)→引用(R)...

   可以引用ＤＡＯ