以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]启动项目加载数据权限  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108426)

--  作者:jyh7081
--  发布时间: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


--  作者:有点甜
--  发布时间:2017/10/22 22:31:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限测试.table


--  作者:jyh7081
--  发布时间:2017/10/22 22:53:00
--  

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


--  作者:jyh7081
--  发布时间:2017/10/22 23:03:00
--  

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

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

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


--  作者:有点甜
--  发布时间:2017/10/22 23:08:00
--  
 窗口->属性->自动打开->设置成False
--  作者:jyh7081
--  发布时间:2017/10/22 23:31:00
--  

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

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

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

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

这是什么道理?


--  作者:有点甜
--  发布时间:2017/10/23 9:30:00
--  

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

 

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