以下语句返回的是ADO还是DAO记录集？

yujin

Set H = CurrentDb.OpenRecordset("select * from " & _
      "NowUser where id =" & CInt(Forms("主控面板")![LoginID]))
我好像在哪看到上述语句在多用户环境下返回ADO记录集，在单用户环境下返回DAO记

录集。
如果是DAO的话可否在多用户环境下使用？

大頭

ADO  & DAO可在多用户环境下使用

DAO记录集

建議使用ADO  

H 改為 rstH

[此贴子已经被作者于2003-11-17 23:46:56编辑过]

没牙兔兔

单从变量的命名规范性和语法来看
就应该是DAO吧

marco2

这早DAO；
如果ADO，正常就会有这样的一个变量声明：
SET XXX AS ADODC.Recordset

yujin

有如下代码（用于判断后台连接）
Option Compare Database
Option Explicit
Public Function CheckLinks(TableName As String) As Boolean
    Dim dbs As Database, rst As Recordset
    Set dbs = CurrentDb
    On Error Resume Next
    Set rst = dbs.OpenRecordset(TableName)
    rst.Close
    If Err = 0 Then
        CheckLinks = True
    Else
        CheckLinks = False
    End If
End Function
已引用DAO36，编译通过。运行时发生错误，显示变量类型不匹配，将Option Explicit 、Dim dbs As Database, rst As Recordset删掉方可运行，为什么？我怀疑    Set rst = dbs.OpenRecordset(TableName)返回的是ADO记录集，导致与    Dim dbs As Database, rst As Recordset语句冲突。

andymark

把 Dim dbs As Database, rst As Recordset 改成
Dim dbs As dao.Database, rst As dao.Recordset 试试看