Office中国论坛/Access中国论坛

标题: 【ACCESS小品】窗体中事件权限设计实例 [打印本页]

作者: todaynew    时间: 2010-1-22 12:34
标题: 【ACCESS小品】窗体中事件权限设计实例
本帖最后由 todaynew 于 2010-1-22 13:13 编辑

对权限设计研究了两天,想大体将权限分为窗体及控件的编辑权限,窗体及控件数据的查阅权限,窗体及控件的事件触发权限三类来处理,前述两类应该不难主要涉及锁定、可见性、筛选等常规处理,倒是第三类问题有些麻烦。因此从难处下手,重点解决事件的权限控制问题。

       一个窗体上到底存在哪些事件,也就是事件的遍历方面遇到了障碍,有版友指出可采用对VB逐行分析的方法找出事件名称来。想了想,此方法还是有些啰嗦。于是另辟蹊径,编写了一个窗体、窗体节、控件对照事件的表(系统里叫做事件目录),以此表来找窗体或控件对应的事件。这个方法,用一个叫做MyprocedureList的自定义函数来体现。事件的遍历解决后,又编写了一个叫做Myprocedure的自定义函数用来对操作人员的权限进行限制。说了这么大一段话,看起来有些复杂。其实整个设计的核心只围绕一条关键语句展开,这条语句名曰:CallByName。

      目前这个实例,是一个相对比较通用的系统,和具体的窗体之间只有在加载事件中用一条语句联系。系统里有两个人员,一个叫做张三,他是管理员,有全部的事件处理权限;另一个人叫做李四,只有部分的事件处理权限。为了同志们测试方便起见,两人的密码均为0000。不多吹了,剩下的同志们自己看实例吧。

[attach]41282[/attach]

[attach]41283[/attach]
作者: kangking    时间: 2010-1-22 14:11
学习一下
作者: 5988143    时间: 2010-1-22 14:16
先試用學習一下~
作者: goto2008    时间: 2010-1-22 16:59
谢谢分享,学习
作者: zxklzxm1983    时间: 2010-1-22 17:19
先顶,再看
作者: asklove    时间: 2010-1-23 09:55
收藏
作者: todaynew    时间: 2010-1-24 08:07
谢谢领导和同志们支持
作者: ycxchen    时间: 2010-1-24 15:01
todaynew又出大作,学习!
作者: yanwei82123300    时间: 2010-1-25 14:22
先試用學習一下~
作者: chuang0321    时间: 2010-2-4 14:47
如此大作,自当拜读
作者: lovelaceliu    时间: 2010-2-4 16:39
新手来初学权限,谢谢楼主的无私奉献
作者: g97126    时间: 2010-2-5 14:56
看看能用不
作者: lilihuanlh    时间: 2010-2-7 00:53
谢谢分享
作者: 风啸啸    时间: 2010-2-14 00:50
学习。
作者: hncddyl    时间: 2010-2-14 20:20
学习一下
作者: wufeng980114    时间: 2010-2-27 20:50
支持
作者: tianxiangwu    时间: 2010-3-16 09:01
我是初学者,学习一下!
作者: c101    时间: 2010-3-16 09:29
谢谢分享
作者: 19720205    时间: 2010-3-16 14:59
这一段时间一直在加强对Access的学习.
看到又一个学习教材,下载了.
感谢楼主了.
作者: df    时间: 2010-3-16 17:32
学习!学习!
作者: szyewj    时间: 2010-8-22 13:47
学习,感谢分享
作者: lkkl66    时间: 2010-9-1 22:50
收藏
作者: li08hua    时间: 2010-9-11 01:59
学习权限一直觉得很难,todaynew介绍后豁然开朗!
作者: li_wanli    时间: 2010-9-14 22:43
正想学习/谢谢了
作者: maymay_1211    时间: 2010-10-5 16:38
不知道能不能學會。。。先收藏。。。。
作者: 哲學    时间: 2010-10-21 15:09
不錯 thank for share
作者: termisss    时间: 2010-11-19 13:14
很有用.!
作者: qmx0993    时间: 2010-12-25 02:55
非常不错,感谢分享
作者: yang5397    时间: 2010-12-26 22:53
学习一下
作者: ganbadou    时间: 2011-2-15 18:00
感谢无私分享, 顶
作者: sun.gd    时间: 2011-2-15 21:18
回复 todaynew 的帖子

很好,学学
作者: meimei30    时间: 2011-4-18 13:52
能下载吗
作者: meimei30    时间: 2011-4-18 13:55
怎么下载不了呢
作者: meimei30    时间: 2011-4-18 15:00
为什么下载不了呢?
作者: meimei30    时间: 2011-4-18 15:22
怎么下载呀?
作者: meimei30    时间: 2011-4-18 15:40
怎么下载呀?
作者: meimei30    时间: 2011-4-18 16:30
能下载了,谢谢!
作者: lovelaceliu    时间: 2011-4-24 22:18
先顶了再学习
作者: wulala21    时间: 2011-5-15 20:39
学习了
作者: meimei30    时间: 2011-6-28 20:54
顶!支持加感谢!
作者: ydfyhp    时间: 2011-12-9 08:29
顶一下,好东西.
作者: huxinhua    时间: 2012-1-11 08:46
谢谢分享,学习
作者: nncchh    时间: 2015-5-25 21:51
学习学习
作者: nncchh    时间: 2015-5-25 21:51
分享
作者: ardu95    时间: 2016-11-1 06:53
谢谢分享,学习
作者: jiutianxingchen    时间: 2018-8-4 20:55
谢谢楼主




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3