Foxtable(狐表)用户栏目专家坐堂 → [求助]启动项目加载数据权限


  共有2100人关注过本帖树形打印复制链接

主题:[求助]启动项目加载数据权限

帅哥哟,离线,有人找我吗?
jyh7081
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:970 积分:8626 威望:0 精华:0 注册:2012/10/3 13:25:00
[求助]启动项目加载数据权限  发帖心情 Post By:2017/10/22 21:56:00 [只看该作者]

项目的“数据表”,4个人有所有数据权限(JJ、LL、YY、CC),其余的人有所在工作组权限(前面的4个人也分别在不同的工作组);

我在项目的LoadUserSetting事件代码如下,但没有起作用,相应窗口的目录树也没起作用:

 

If User.Name = "JJ" OrElse User.Name = "LL" OrElse User.Name = "YY" OrElse User.Name = "CC" Then   '这4人加载所有数据
    DataTables("数据表").LoadFilter = ""
Else
    DataTables("数据表").LoadFilter = "团队 = '" & User.group & "'"           '其他人加载本团队数据
End If
DataTables("数据表").Load()

 

附件:

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限测试.table


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/22 22:31:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限测试.table


 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:970 积分:8626 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/10/22 22:53:00 [只看该作者]

没发现哪里改动呀?却行了.....


 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:970 积分:8626 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/10/22 23:03:00 [只看该作者]

加了句:Forms("流程管理").show

但去掉也行。请老师指点下,是什么原因?

在这里用了很长时间...


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/22 23:08:00 [只看该作者]

 窗口->属性->自动打开->设置成False

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:970 积分:8626 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/10/22 23:31:00 [只看该作者]

老师太高明了!我前后断断续续折腾了2天都不止。

我的例子和你发的答案对了几遍,就发现加了句:Forms("流程管理").show。

你说的: 窗口->属性->自动打开->设置成False ,我觉得还不重要,因为我的项目本来就是这样设置的。

但是把我发的例子和我的项目加入:Forms("流程管理").show,运行一次;再注释掉,重启一次项目,就行了。

这是什么道理?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/23 9:30:00 [只看该作者]

回复6楼,应该是bin文件夹的问题,你把文件夹删除重新打开项目即可。

 

但一定要设置  窗口->属性->自动打开->设置成False


 回到顶部