Access快速开发平台(2.5.1.462版本)在accdb\mdb格式下,VBA密码保护时错误提示无法消除的解决方法-易勋
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access开发平台


Access快速开发平台(2.5.1.462版本)在accdb\mdb格式下,VBA密码保护时错误提示无法消除的解决方法

发表时间:2020/10/22 13:46:29 评论(0) 浏览(3666)  评论 | 加入收藏 | 复制
   
摘 要:Access快速开发平台(2.5.1.462版本)在accdb\mdb格式下,VBA密码保护时错误提示无法消除的解决方法
正 文:

      Access快速开发平台最近的版本新增了一个功能,就是在VBA代码可读的情况下,如果出错,按F8可以跳转到出错代码行。

    If RDPErrorHandler(Me.Name & ": Sub btnSave_Click()") Then
        Resume
    Else
        Resume ExitHere
    End If
Resume就是调整到出错代码行,Resume ExitHere是结束该事件、过程。


但是最近使用,发现VBA密码未输入的情况下,由于对于VBA代码是否可读判断异常,导致出错后错误提示无法消除的问题。

经过调试,确定是CanViewVBACode()函数的判定出现了问题:

Public Function CanViewVBACode() As Boolean
    If IsRuntime() or IsMDE() Then
        CanViewVBACode = False
    Else
        CanViewVBACode = True
    End If
End Function

测试发现,在accdb格式下,不管是否输入了VBA密码,CanViewVBACode都是返回True,这样就会导致用户虽然看不到VBA代码,但是函数判定他可以看到,从而执行Resume操作,但是用户此时又是无法看到代码的,就会陷入无限循环弹出错误提示的现象。


临时解决方法

打开basRDPRef模块,找到CanViewVBACode函数,将其改为如下:

Public Function CanViewVBACode() As Boolean
    CanViewVBACode = False
End Function
最终解决方案请等待Access快速开发平台发布新版本。


Access软件网交流QQ群(群号:198465573)
 
 相关文章
链接密码保护的数据库  【朱亦文  2007/11/29】
如何用代码修改Access数据库的密码?  【麥田  2017/2/28】
平台的菜单文本需要输入密码才能访问  【凝听  2017/11/20】
如何设置VBA代码的密码?如何取消VBA代码的密码?请问怎么把VB...  【麥田  2018/3/17】
Access快速开发平台自动更新,保留默认账号和密码的方法  【宏鹏  2019/7/14】
Access快速开发平台企业版--数据库升迁工具提示“密码无效”的...  【宏鹏  2019/12/11】
常见问答
技术分类
相关资源
文章搜索
关于作者

易勋

文章分类

文章存档

友情链接