Access快速开发平台--2.4.3版本错误#13权限项【|】未定义，在【报销明细】中，应用权限控制失败。的解决方法

时　间:2019-04-09 08:49:29
作　者:麥田   ID：11  城市：上海  QQ：3002789054
摘　要:Access快速开发平台--2.4.3版本错误#13权限项【|】未定义，在【报销明细】中，应用权限控制失败。的解决方法
正　文:

一、学员问题描述：
在学习Access快速开发平台一日通报销管理系统教程过程中，使用平台的【数据模块生成器】自动创建的窗体，点击编辑按钮，修改窗体会提示如下错误:
错误#13权限项【|】未定义，在【报销明细】中，应用权限控制失败。如下图:


二、解决方法：
我们先关闭这个错误提示，然后在左侧工具栏的对象里面，找到这个出错的“报销明细”编辑窗体，即_Edit的窗体，右击进入该窗体的设计视图，在该窗体的加载事件过程我们找到如下代码:
Private Sub Form_Load()
    ApplyTheme Me
    LoadLocalLanguage Me
    If Nz(Me.OpenArgs) <> "" Then
        LoadRecord Me, "Select * FROM [tblExpense] Where [ID]=" & Nz(Me.OpenArgs, 0)
        If haspermission("报销明细", "审核") = True Then
        Me.cmdExamine.Enabled = True
        End If
            If haspermission("报销明细", "财务确认") = True Then
                If Me.Examine = True Then
                  Me.cmdAccounting.Enabled = True
             End If
        End If
        Me.EID.SetFocus
    End If

    If Me.DataEntry Then
        Me![ID] = Null
    End If

    Me.btnSave.Enabled = Me.AllowEdits
End Sub

将这一句代码：
If haspermission("报销明细", "审核") = True Then

改成如下代码：
If haspermission("报销明细", "Audit") = True Then

即“审核”改成对应的英文“Audit”，保存代码，再运行该窗体，错误解除。

这个错误是由于2.4.3平台的一个bug造成的，如果还有学友在用2.4.3平台请到Access快速开发平台官网下载最新版2.4.5平台，升级到最新版也可解决这个问题。

Access快速开发平台QQ群 (群号:321554481) 　　　　　　Access源码网店