访问更新查询崩溃程序

Question

我最近将 Access 2010 中内置的数据库移动到 Access 2013 。它工作正常一段时间然后每当使用VBA更新某个表时它突然开始崩溃（即没有响应）。我可以自己运行查询而没有任何问题，但无法在VBA中调用它。下面是导致崩溃的代码示例。任何更新此表的尝试都会导致崩溃：

Sub ShipOrder(OrderID As Long)

Dim strSQL As String

On Error GoTo ErrorHandler

strSQL = "UPDATE Orders SET StatusID = 20 WHERE ID = " & OrderID

CurrentDb.Execute strSQL, dbFailOnError

Exit Sub

ErrorHandler:

MsgBox Err.Description

End Sub

我已经将所有表格，表单等移动到新数据库中，以防旧版本被破坏但问题仍然存在。

非常欢迎任何有关导致此错误的建议！

感谢。

Answer 1

声音就像您的链接数据库是问题.. 你试过 -

docmd.RunSQL ""

可能是CurrentDb上的CurrentDb.Execute是问题......

祝你好运..