以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 不用用户可见不同列代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103409)

--  作者:6378929
--  发布时间:2017/7/7 12:58:00
--  [求助] 不用用户可见不同列代码
只有用户组(管理员),才能看见表1中的第三列,,其他用户组均不能看见第三列?

[此贴子已经被作者于2017/7/7 12:58:54编辑过]

--  作者:有点甜
--  发布时间:2017/7/7 14:18:00
--  

If _UserGroup = "管理员" Then

    Tables("表A").Cols("第三列").Visible = true

Else

    Tables("表A").Cols("第三列").Visible = False

End If


--  作者:6378929
--  发布时间:2017/7/10 8:44:00
--  
我的录入系统怎么把出借单按照管理员和其他用户组隐藏或关闭
只有管理员登录才显示录入窗口中的出借单位录入  其他用户组均不可见
图片点击可在新窗口打开查看此主题相关图片如下:mlwxsf8llxrxtk$aqpcjh)i.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/7/10 8:49:00
--  

窗口AfterLoad事件,写代码

 

If _UserGroup = "管理员" Then

    e.Form.Controls("TextBox1").Visible = true

Else

    e.Form.Controls("TextBox1").Visible = false

End If