以文本方式查看主题

-  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
--  
已经加载了,还是弹出提示
图片点击可在新窗口打开查看此主题相关图片如下:加载.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2021/6/23 11:51:00
--  
确定不是"quanxg1"?

BeforeLoadOuterTable事件有没有限制加载?