ADO Recordset错误

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

在公开场合，我得到的课程没有注册＆＃39;

Access 2010，Windows 7

Answer 1

两个想法 -

（1）是你的参考指向正确版本的ADO（通常是最新版本，对你来说可能是6. [某事]？ （2）你的记录集open语句应该指定游标类型和锁类型，并且根据你引用的版本，缺少这些东西可能能够解释它。

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

Answer 2

问题的答案是没有答案。我刚刚给MS支持一个小时的电话，他们让工程师看问题的唯一方法就是支付499美元。他们没有问题的答案，或者没有你能得到的答案。问题出在Office 365中，因为应用程序在Office 10中运行完美。我发布此文件以防其他人遇到此问题。