以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=102720)

--  作者:1131369760
--  发布时间:2017/6/24 16:25:00
--  [求助]窗口
普通用户登录之后自动关闭窗口和指挥者登录之后自动弹出窗口的代码如何写
--  作者:有点蓝
--  发布时间:2017/6/24 16:55:00
--  
关闭窗口:Forms(“窗口1”).Close

打开:Forms(“窗口1”).Open

--  作者:狐狸爸爸
--  发布时间:2017/6/24 16:56:00
--  
在这个事件写代码:
http://www.foxtable.com/webhelp/scr/1323.htm

If User.Type = UserTypeEnum.Developer Then
    Forms("窗口名").Open()
Else
   Forms("窗口名").Close()
End If