Office中国论坛/Access中国论坛

标题: 以下语句返回的是ADO还是DAO记录集？ [打印本页]

作者: yujin 时间: 2003-11-18 01:35
标题: 以下语句返回的是ADO还是DAO记录集？
Set H = CurrentDb.OpenRecordset("select * from " & _
"NowUser where id =" & CInt(Forms("主控面板")![LoginID]))
我好像在哪看到上述语句在多用户环境下返回ADO记录集，在单用户环境下返回DAO记

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

作者: 大頭 时间: 2003-11-18 07:46
ADO & DAO可在多用户环境下使用

DAO记录集

建議使用ADO

H 改為 rstH

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

作者: 没牙兔兔 时间: 2003-11-18 16:53
单从变量的命名规范性和语法来看
就应该是DAO吧

作者: marco2 时间: 2003-11-18 19:46
这早DAO；
如果ADO，正常就会有这样的一个变量声明：
SET XXX AS ADODC.Recordset

作者: yujin 时间: 2003-11-24 04:13
有如下代码（用于判断后台连接）
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 时间: 2003-11-24 05:00
把 Dim dbs As Database, rst As Recordset 改成
Dim dbs As dao.Database, rst As dao.Recordset 试试看

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)