老师,一个人承担多个角色权限管理,下面代码是一个人在资金计划申报环节的角色是经办人,但在项目进度管理环节的角色却是部门负责人审核,现在要承担经办人角色,下面的代码提示红色部分代码有错,请老师帮助纠正,谢谢!!!
If e.Col.Name = "XZH" Then
If User.Roles <> "部门负责人" AndAlso User.Roles NOT Like "%经办人%" Then
If e.Row("TBDW") <> User.GROUP OrElse e.Row("TB") <> User.NAME OrElse e.Row("sbzgb") = True Then '在编辑某行前,会自动判断负责此行的部门列是否和登录用户所属分组相同,如果不同,则取消编辑.
e.Cancel = True
End If
End If
Else
If e.Row("TBDW") <> User.GROUP OrElse e.Row("TB") <> User.NAME OrElse e.Row("sbzgb") = True Then '在编辑某行前,会自动判断负责此行的部门列是否和登录用户所属分组相同,如果不同,则取消编辑.
e.Cancel = True
End If
End If