以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口加载表视图问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5611)

--  作者:wqc360
--  发布时间:2009/12/23 21:05:00
--  窗口加载表视图问题
不同用户组加载不同表视图,在窗口AfterLoad事件怎么不行 ,应该怎么做。谢谢

Select Case Vars("用户组")

    Case "管理员"

        Tables("员工档案").OpenView("管理员")

        Tables("员工档案.工资调整").OpenView("管理员")

        Tables("员工档案.工龄调整").OpenView("管理员")

    Case Else

        Tables("员工档案").OpenView("车间主管")

        Tables("员工档案.工资调整").OpenView("车间主管")

        Tables("员工档案.工龄调整").OpenView("车间主管")

End Select


--  作者:czy
--  发布时间:2009/12/24 0:26:00
--  

没发现问题。


--  作者:czy
--  发布时间:2009/12/24 0:35:00
--  
楼主最好上传文件,让大家看看你到底哪个环节出现了问题。
--  作者:czy
--  发布时间:2009/12/24 0:57:00
--  
似乎知道你的问题出在哪了。
切换用户时没有对全局变量赋值。
或许你应该改成这样

Vars("用户组") = User.Group

Select Case Vars("用户组")

    Case "管理员"

……

End Select



--  作者:wqc360
--  发布时间:2009/12/24 8:55:00
--  
已经解决,原因是我自己造成的,我在切换用户以后,已经隐藏了窗口设计,所以用其他用户打开的窗口还是原管理员打开的,窗口没有重新加载,我在打开窗口按钮代码前面加上关闭此窗口,再打开此窗口,窗口控件重新加载,OK,看到我要的效果了,谢谢C版