以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]根据授权表窗口名称,在菜单中设定打开窗口权限  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91147)

--  作者：liuyixin662 --  发布时间：2016/9/30 13:54:00 --  [求助]根据授权表窗口名称,在菜单中设定打开窗口权限 老师你好,如何根据授权表窗口名称,在菜单中设定打开窗口权限,麻烦老师改一下菜单的click事件: For Each dr As DataRow In DataTables("授权表").Select("\',\' + 用户名 + \',\' like \'%," & User.Name & ",%\'" )     For Each f As WinForm.Form In Forms         If User.Name = dr("用户名")  And  f.Name = dr("窗口名") Then             Forms("仓库资料").Open()         Else             If User.Name = dr("用户名")  And  f.Name <> dr("窗口名") Then                 Return                              End If         End If     Next Next

--  作者：有点蓝 --  发布时间：2016/9/30 15:16:00 --   不明白你的用法是怎么样的。一般都是一个菜单按钮对应一个窗口，直接控制菜单的权限就可以了

--  作者：liuyixin662 --  发布时间：2016/9/30 15:48:00 --   菜单按钮对应的窗口名 此主题相关图片如下：2016-09-30 154510.bmp

--  作者：liuyixin662 --  发布时间：2016/9/30 16:12:00 --   授权表 此主题相关图片如下：授权表.bmp

--  作者：有点蓝 --  发布时间：2016/9/30 16:41:00 --   直接控制菜单http://www.foxtable.com/webhelp/scr/2438.htm