以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口的操作权限  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=68431)

--  作者:laly
--  发布时间:2015/5/17 22:35:00
--  窗口的操作权限

现求助,让非开发者登陆时,不能够打开指定的窗口。

If User.Type <>  UserTypeEnum.Developer
   forms("主窗口")
 =  False

     End  If

这样不行 请问:还有别的方法吗?


--  作者:大红袍
--  发布时间:2015/5/17 23:45:00
--  

 呃,代码你写到哪个事件了?加入msgbox,看是否弹出对话框。

 

msgbox(User.Type)

If User.Type <>  UserTypeEnum.Developer

   msgbox(22222)
   forms("主窗口")
 =  False

End  If