主题：用户权限

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目9_201505180820.zip

 

 

我建一个名为（公司）的表

此主题相关图片如下：捕获.jpg

 

我设置了四名管理人员，分别是 

1、王天一     只能浏览 一分公司  的数据

2、张艳        只能浏览 二分公司  的数据

3、刘宝玉     只能浏览 三分公司  的数据

4、经理        能浏览   所有分公司 的数据

 

我在 PrepareEdit 命令编辑

If e.Row("负责人") <> User.Name Then
    e.Cancel = True
End If

 

在 AfterOpenProject 命令编辑

Tables("公司").Filter="负责人='" & User.name & "'"

 

只实现了不同用户编辑不同的行

我想给经理授权 可以编辑整个表的数据？要如何编辑给与权限呢？

求教？