以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]目标: 开单员登录时,显示第“1、2、3、8、9、10”列; 入库员登录时,显示第“1、2、4、6、8、10”列,并冻结前3列。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=96549)

--  作者:fengwenliuyan
--  发布时间:2017/2/23 9:31:00
--  [求助]目标: 开单员登录时,显示第“1、2、3、8、9、10”列; 入库员登录时,显示第“1、2、4、6、8、10”列,并冻结前3列。
“表A”中有10列,窗口1中table绑定“表A”,现有用户:“入库员”、“开单员”。

目标:
开单员登录时,显示第“1、2、3、8、9、10”列;
入库员登录时,显示第“1、2、4、6、8、10”列,并冻结前3列。

测试时,我在窗口1的afterload事件代码:
If User.Name = "入库员" Then
    Tables("表A").SetColVisibleWidth("第一列|45|第二列|45|第四列|45|第六列|45|第八列|45|第十列|45")
    CurrentTable.Cols.Frozen = 3 
End If

结果,在“入库员”登录时,错误窗口提示

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

问题项目上传:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:设置显示列.foxdb



--  作者:有点蓝
--  发布时间:2017/2/23 9:38:00
--  

窗口不要设置为自动打开,在AfterOpenProject事件写代码

 

Forms("窗口1").Open


--  作者:fengwenliuyan
--  发布时间:2017/2/23 9:52:00
--  谢谢老师!
谢谢老师!