以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  采用外部表存储用户信息后目录树授权失败  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84771)

--  作者:aochao1234
--  发布时间:2016/5/10 11:29:00
--  采用外部表存储用户信息后目录树授权失败
采用外部表存储用户信息后,按照目录树授权就没用了,提示为找到实例


之前没用外部表存储用户信息都可以用,我目录树授权完全照搬手册上的代码,求问怎么改代码

--  作者:大红袍
--  发布时间:2016/5/10 11:45:00
--  

 做什么操作的时候报错?截图说明

 

http://www.foxtable.com/help/topics/1485.htm

 


--  作者:aochao1234
--  发布时间:2016/5/10 12:06:00
--  
如果我按手册上的目录树权限进行设置并且增加了 如下几个权限 

图片点击可在新窗口打开查看此主题相关图片如下:授权.png
图片点击可在新窗口打开查看


如果我在某个按钮上这样写click代码
If User.IsRole("建造师出场")Then
    MainTable=Tables("建造师出场表")  \'审核代码
Else
    MessageBox.Show("无权限!")
End If

那是不是敖超和熊文能打开这个表  而胡欢秀和万莉不行呢
[此贴子已经被作者于2016/5/10 12:07:33编辑过]

--  作者:大红袍
--  发布时间:2016/5/10 12:20:00
--  

你要去编写授权函数

 

If Functions.Execute("ShouQuan","财务部,资质部","建造师出场") Then
    MainTable=Tables("建造师出场表")  \'审核代码
Else  
    msgbox("无权限")
End If

 


--  作者:aochao1234
--  发布时间:2016/5/10 12:51:00
--  
我按你说的去弄了,可是提示说不存在这个分组,可是我明明有这个分组啊,是不是这个函数要绑定到这个授权表之类的,我这个表的名字和函数里面表名是一样的 都叫授权
[此贴子已经被作者于2016/5/10 12:52:34编辑过]

--  作者:大红袍
--  发布时间:2016/5/10 14:43:00
--  
 具体做个例子上来测试吧。
--  作者:aochao1234
--  发布时间:2016/5/10 15:10:00
--  

已经上传了 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.rar

请版主大人帮忙看看
--  作者:大红袍
--  发布时间:2016/5/10 15:15:00
--  
 把你的access数据库也发上来,才能测试。