我正在使用遗留数据库.mdb数据库，当它遇到包含CurrentProject.Connection的行时，它们在Access 2007中崩溃。
当我向全新数据库添加相同的代码时，它也会崩溃。
Dim rstDateFields As New adodb.Recordset
rstDateFields.Open "SELECT * FROM defDateFields ORDER BY FieldID", CurrentProject.Connection, adOpenDynamic, adLockOptimistic
引用设置为：VBA，MS ACCESS 12.0对象库，OLE自动化，MS Ofrfice 14.0访问数据库引擎对象
答案 0 :(得分：1)
您向我们展示的代码是非常基本的ADO，因此很难相信代码本身就是问题的原因。通过从另一台计算机尝试相同的代码，检查问题是否与该计算机隔离。如果它在那里运行没有错误，很可能原始机器以某种方式被破坏。不幸的是，试图找到并修复破损可能具有挑战性。祝你好运！
答案 1 :(得分：0)
一个猜测：你能确定你的记录集属于ADO类型吗？您是否对记录集使用隐式声明，例如“Dim rs as recordset”？在这种情况下，您的记录集可能是DAO类型。
无论如何，我们很乐意帮助你，但你应该给我们一些代码来了解你的问题！