以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]打开另一窗口按扭权限代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=76104)

--  作者:ZHX88863808
--  发布时间:2015/10/21 19:37:00
--  [求助]打开另一窗口按扭权限代码

窗口中有一个打开订单窗口的按扭,该按扭只有开发者、张三和李四可以点击打开订单窗口,其他人点击不可以打开,请老师前辈帮忙写个代码,谢谢!


--  作者:大红袍
--  发布时间:2015/10/21 19:42:00
--  

If user.Name = "开发者" OrElse User.Name = "张三" Then

 

Else

    msgbox("你没有权限")

End If


--  作者:ZHX88863808
--  发布时间:2015/10/21 19:51:00
--  
老师:这只是按扭权限,我想开发者和张三、李四点击时同时打开订单窗口,(即权限和打开代码一起实现),没有权限的点击打不开并提示,麻烦帮忙再修改一下,谢谢!
--  作者:大红袍
--  发布时间:2015/10/21 20:19:00
--  

If user.Name = "开发者" OrElse User.Name = "张三" Then

    Forms("窗口1").Show

Else

    msgbox("你没有权限")

End If


--  作者:ZHX88863808
--  发布时间:2015/10/21 20:23:00
--  
谢谢老师!!!