Access快速开发平台的通用附件管理模块,如果打开不进行操作,按esc直接退出,有时会弹“用户取消操作”弹窗。如下图:
解决方法1:
用鼠标点“取消”按钮即可。
解决方法2:
弹窗代码位于SysFrmAttachments窗体的EmptyDump过程。错误代码为3059,修改此过程,屏蔽掉3059错误的弹窗。
Public Sub EmptyDump()
On Error GoTo ErrorHandler
'
ExitHere:
On Error Resume Next
CurrentDb.Execute "Delete FROM TMP_Attachments Where SessionID='" & Me.SessionID & "'"
Exit Sub
ErrorHandler:
If strFlag <> "File deleted" Then
'如果是3059报错就不提示。
If Err <> 3059 Then
MsgBoxEx Err.Description, vbCritical
End If
End If
Resume ExitHere
End Sub
具体报错原因没时间查,我的思路如下:
运行Set rst = CurrentDb.OpenRecordset(strSQL) 这句代码时出现了问题。