运行-即使我关闭连接也会出现时间错误“3048”

Run-Time error '3048' happening even though I close connections

我遇到了以前从未见过的错误。我一直看到这个:

Run-time error '3048':

Cannot open any more databases.

用谷歌搜索后,似乎当有非常复杂的表单有很多列表或组合框时,就会发生这种情况,这些列表或组合框的来源是 table/query。但是,我已经有一段时间没有更改这些表格了,我突然看到了这一点。另外,我的表单实际上并没有那么复杂,通常只是一个列表,也许还有 1 或 2 个组合框。我昨天 (2/2/22) 才开始看到这个错误

几乎在所有情况下,我都使用以下代码访问 table:

Dim rst As Recordset: Set rst = CurrentDb.OpenRecordset("table name or SQL statement")

然后我将使用诸如 AddNew、Edit 或只是遍历记录集之类的方法访问数据。

With rst
    .AddNew
    .Fields("name") = "Value"
End With

Do Until rst.EOF
    'Do something
    .MoveNext
Loop

而且我已经仔细检查过每次打开记录集时都会关闭它

rst.Close
Set rst = Nothing

但是,我现在一直看到那个错误。有没有其他方法我应该关闭这些正确关闭连接的记录集?我猜打开这些会导致一些我不知道的东西挥之不去。

我现在唯一的解决办法是完全重启我的电脑,然后我可以使用它一段时间,然后再看到错误。

感谢您的帮助!

编辑:当我收到该错误时,我什至无法关闭 Access 中的所有内容并手动打开 table 来查看它。我收到此错误消息

Reserved error (-1104); there is no message for this error.

不幸的是,这是一个已知的当前错误:

Access doesn't close properly. A remaining background process can only be terminated in task manager

尚无官方信息或补救措施。

我在更新 Office 365 到最新版本(221,内部版本 14827.20158)后也遇到了这些问题。当我关闭 Access 应用程序并重新打开它时,我立即收到错误消息。然后我首先必须重新启动我的计算机以使应用程序工作,直到它达到最大连接数。