以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  topicbar控件中任务不可用  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=163019)

--  作者:cqlwsam
--  发布时间:2021/4/21 8:51:00
--  topicbar控件中任务不可用
如题:
topicbar由页面1,2,3;每个页面下由若干任务,想实现根据用户角色,如user1页面1、页面3下的任务不可用,但可见。如何实现,代码写在afterload中,还是topiclinkclick中。谢谢!
[此贴子已经被作者于2021/4/21 8:51:47编辑过]

--  作者:有点蓝
--  发布时间:2021/4/21 9:08:00
--  
代码写在afterload中,动态生成任务:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=148921&skin=0
--  作者:cqlwsam
--  发布时间:2021/4/21 10:06:00
--  
生成任务没什么问题。
我的问题是:想实现根据用户角色,如user1页面1、页面3下的任务不可用,但可见。

--  作者:有点蓝
--  发布时间:2021/4/21 10:11:00
--  
Dim tl1 As WinForm.TopicLink
tl1 = Forms(
"窗口1").Controls("TopicBar1").Pages(0).Links(0)

if user.IsRole("审核") then
tl1.enabled = true
else
tl1.enabled = false
tl1.Visible= true
end if