- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]TopicBar导航权限 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=94109)
-- 发布时间：2016/12/15 15:15:00
-- [求助]TopicBar导航权限
TopicBar任务栏
这种类型的导航权限怎么控制。
比如：录入员 登录后 有些表名称不让看到。
-- 发布时间：2016/12/15 15:31:00
--
你可以任意隐藏的。要写代码
If User.Group = "录入员" Then
Dim tp1 As WinForm.TopicPage
tp1 = Forms("窗口1").Controls("TopicBar1").Pages(0)
tp1.Visible = False
End If
http://www.foxtable.com/webhelp/scr/0851.htm
http://www.foxtable.com/webhelp/scr/0858.htm
-- 发布时间：2016/12/15 23:16:00
--
我是想隐藏 导航 里面的 任务
-- 发布时间：2016/12/16 8:26:00
--
那可以这样写
If User.Group = "录入员" Then
Dim tp1 As WinForm.TopicPage
tp1 = Forms("窗口1").Controls("TopicBar1").Pages(0)
tp1.Links(0).Visible = False
tp1.Links(1).Visible = False
End If