ADO记录集错误

Question

我有一个简单的表，其中包含两个我想使用ADO记录集打开的字段。代码如下：

Dim Colcon As ADODB.Connection
        Set Colcon = CurrentProject.Connection
        Dim ColRs As New ADODB.Recordset
        ColRs.ActiveConnection = Colcon

    Dim ColSQL As String
    ColSQL = "SELECT ColTbl.LastDate, ColTbl.ColCode"
    ColSQL = ColSQL + " FROM ColTbl"
    ColRs.Open ColSQL

在开放的情况下，我得到“类未注册”

Access 2010，windows 7

Answer 1

两个想法-

(1)您的引用是否指向正确的ADO版本(通常是最新版本，对您来说可能是6.0版本？) (2)您的记录集open语句应该指定游标类型和锁类型，根据您引用的版本，缺少这些内容可能能够解释它。

ColRs.Open "SELECT * FROM table_name", CurrentProject.Connection _
    , adOpenStatic, adLockReadOnly

Answer 2

这个问题的答案是没有答案。我刚打完一个小时的电话给微软支持，他们唯一能让工程师解决这个问题的方法就是我付499美元。他们对这个问题没有答案，或者没有你能找到的答案。这个问题出在Office365中，因为这个应用程序在Office10中运行得很好。我把这篇文章贴出来，以防其他人遇到这个问题。