系统资源超出同时内幕交易在Access执行SQL UPDATE(System Resources E

2019-09-22 01:20发布

我执行一个简单的UPDATE tblTable SET DataSet=3事务内部,而是试图运行几秒钟后,我收到了3035 -系统资源超出。 有〜30K行。

Dim db As DAO.Database, wrk As DAO.Workspace, errCount As Long, stSQL As String

Set db = CurrentDb
Set wrk = DBEngine.Workspaces(0)
errCount = 0
wrk.BeginTrans
    Debug.Print "There are no existing entries in the selected DataSet, preparing to proceed..."
    ' - -- ---
    stSQL = "UPDATE tblImportCleaned SET DataSetID=" & Me.lstDataSets
    db.Execute stSQL, dbSeeChanges
    If db.RecordsAffected < 1 Then errCount = errCount + 1
    Me.frmImport_CleanedSubform.Requery
    ' - -- ---

If errCount = 0 Then
    If MsgBox("There were no errors, would you like to COMMIT the changes?", vbYesNo) = vbYes Then
        wrk.CommitTrans
    Else
        wrk.Rollback
    End If
Else
    wrk.Rollback
End If
wrk.Close

任何想法,为什么这种情况正在发生以及我如何避免它,请。

Answer 1:

这似乎是你即更新整个表,而WHERE条件,你确定你要更新整个表,如果你是在一个循环更新整个表(我没有看到你的代码回路,你仍然可以调用这个在一个循环)系统程序有收到此错误的可能性很高。



文章来源: System Resources Exceeded whilst performing UPDATE SQL in Access inside Transaction