以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 可视化授权可否用外部表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169389) |
-- 作者:zhangxl1964 -- 发布时间:2021/6/15 7:54:00 -- 可视化授权可否用外部表 有点甜老师:你好! 可视化授权可否用外部表?
|
-- 作者:有点蓝 -- 发布时间:2021/6/15 8:45:00 -- 可以的。把外部表添加进来即可 |
-- 作者:zhangxl1964 -- 发布时间:2021/6/17 19:38:00 -- 有点甜老师:你好! 有示例吗?帮助文档没能找到。 |
-- 作者:有点蓝 -- 发布时间:2021/6/17 19:44:00 -- 添加外部表?http://www.foxtable.com/webhelp/topics/1812.htm |
-- 作者:zhangxl1964 -- 发布时间:2021/6/21 16:22:00 -- 外部表已添加,怎么把外部表的可视化权限引入,在那个事件中写入代码?代码? |
-- 作者:有点蓝 -- 发布时间:2021/6/21 16:27:00 -- 参考:http://www.foxtable.com/webhelp/topics/1600.htm |
-- 作者:zhangxl1964 -- 发布时间:2021/6/23 10:43:00 -- 我把代码放在:LoadUserSetting项目事件中,弹出提示: For Each t As Table In Tables t.Visible = True t.AllowEdit = True For Each c As Col In t.Cols c.Visible = True c.AllowEdit = True Next Next Tables("quanxgl").Visible = (User.Type <> UserTypeEnum.User ) If User.Type = UserTypeEnum.User Then For Each dr As DataRow In DataTables("quanxgl").Select("yhmc = \'" & User.Name & "\'" ) If dr.IsNull("liem") Then Tables(dr("biaom")).Visible = Not dr("bkj") Tables(dr("biaom")).AllowEdit = Not dr("bkbj") Else Tables(dr("biaom")).Cols(dr("liem")).Visible = Not dr("bkj") Tables(dr("biaom")).Cols(dr("liem")).AllowEdit = Not dr("bkbj") End If Next End If
|
-- 作者:有点蓝 -- 发布时间:2021/6/23 10:46:00 -- 要先把外部表添加进来:http://www.foxtable.com/webhelp/topics/1812.htm |
-- 作者:zhangxl1964 -- 发布时间:2021/6/23 11:25:00 -- 已经加载了,还是弹出提示 ![]() ![]() |
-- 作者:有点蓝 -- 发布时间:2021/6/23 11:51:00 -- 确定不是"quanxg1"? BeforeLoadOuterTable事件有没有限制加载?
|