| 以文本方式查看主题 - 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=13803) |
| -- 作者：lime7523 -- 发布时间：2011/10/28 3:25:00 -- 求助可视化授权代码 我想要功能区、功能组、按键的不可见代码
我发现在表A建立窗口以后，虽然可视化授权可以做到，表不可见和不可编辑，但是我在窗口上设置一个按键事件为Tables("表A").Current.Delete能操作！
那么我想吧用户直接不可见，功能区、或功能组、或按键。这样虽然绑定了表。也没法操作了！
不知道我这样的想法对不对，请专家们给点好的建议
顺便我想要功能区、功能组、按键，不可见代码，谢谢 |
| -- 作者：狐狸爸爸 -- 发布时间：2011/10/28 7:35:00 -- Dim dr As DataRow = DataTables("授权表").Select("用户名 = \'" & User.Name & "\' And 表名 = \'" & CurrentTable.DataTable.Name & "\'" ) if dr is Nothing OrElse dr("允许删除") = True Tables("表A").Current.Delete End if [此贴子已经被作者于2011-10-28 7:35:29编辑过]
|