按ESC退出附件窗体时去掉“用户取消操作”弹窗的解决方法-ligy118
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access开发平台


按ESC退出附件窗体时去掉“用户取消操作”弹窗的解决方法

发表时间:2023/5/8 15:45:21 评论(0) 浏览(1868)  评论 | 加入收藏 | 复制
   
摘 要:Access快速开发平台的附件模块,如果打开不进行操作,按esc直接退出,有时会弹“用户取消操作”弹窗。两个办法不弹窗。
正 文:

      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) 这句代码时出现了问题。

点击图片查看大图


Access软件网交流QQ群(群号:198465573)
 
 相关文章
[示例]用ESC键来中断程序的运行  【Dev Ashish,竹笛(译)  2009/11/9】
如何取消操作查询的警告提示\DoCmd.SetWarnings F...  【t小雨  2009/11/26】
Access按下“ESC”键后退出窗体;Access ESC键的妙...  【YGCEP  2010/5/13】
【access入门】设置快捷键之Enter回车键与Esc取消键的小...  【麥田  2011/12/28】
access安全警告:如果文件包含有意破坏计算机的代码,文件可能会...  【麥田  2012/7/29】
如何取消操作查询的警告提示?Access去除查询提示框的方法-Do...  【杜超-2号  2013/8/24】
Access快速开发平台--遇到进度条卡死按Esc键强行退出进度条...  【麥田  2022/11/19】
常见问答
技术分类
相关资源
文章搜索
关于作者

ligy118

文章分类

文章存档

友情链接