个人中心
文章发布
退出
作者热门文章
- ubuntu12.04环境下使用kvm ioctl接口实现最简单的虚拟机
- Ubuntu 通过无线网络安装Ubuntu Server启动系统后连接无线网络的方法
- 在Ubuntu上搭建网桥的方法
- ubuntu 虚拟机上网方式及相关配置详解
25
4
CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.
这篇CFSDN的博客文章基于逻辑运算的简单权限系统(原理,设计,实现) VBS 版由作者收集整理，如果你对这篇文章有兴趣，记得点赞哟.
作者: slightboy, 时间: 2006-10-14 首发于: http://cs.alienwave.cn/Topic/329.aspx 看到好多同学权限判断都是用字符串 然后或分割或截取 其实对于 允许/不允许(true/false) 这种的权限, 用逻辑运算再恰当不过了 声明下: 本文针对入门和为掌握的同学, 如果已经懂了那可以无视了 可能意思表达的不是很清楚, 敬请原谅. 逻辑运算符介绍: And: 逻辑与 0 And 0 = 0 0 And 1 = 0 1 And 0 = 0 1 And 1 = 1 Or: 逻辑或 0 Or 0 = 0 0 Or 1 = 1 1 Or 0 = 1 1 Or 1 = 1 Xor: 异或 0 Xor 0 = 1 0 Xor 1 = 1 1 Xor 0 = 1 1 Xor 1 = 1 Not: 逻辑非 Not 1 = 0 Not 0 = 1 表达方式介绍: 1 表示 ture, 0 表示 false 举二位为例 第一位 表示 Read 的权限, 第二位 表示 Write 的权限, 可以表示一下四种权限 00 Read(false) Write(false) 01 Read(true) Write(false) 10 Read(false) Write(true) 11 Read(true) Write(true) 运算方式介绍: 还是继续上面的例子 Read = 01(1), Write = 10(2) 00(0) And Read = 0 01(1) And Read = Read 10(2) And Read = 0 11(3) And Read = Read 00(0) And Write = 0 01(1) And Write = 0 10(2) And Write = Write 11(3) And Write = Write 下面给出示例代码: 权限定义类(要有枚举类型该多好啊...) Class PermissionTypePublic ReadPublic WritePublic DeletePrivate Sub Class_InitializeRead = 1Write = 2Delete = 4End SubEnd Class 权限类 Class PermissionSetComponentPrivate intValuePublic Property Get Read()Read = GetValue(Permission.Read)End PropertyPublic Property Let Read(arg)Call SetValue(Permission.Read, arg)End PropertyPublic Property Get Write()Write = GetValue(Permission.Write)End PropertyPublic Property Let Write(arg)Call SetValue(Permission.Write, arg)End PropertyPublic Property Get Delete()Delete = GetValue(Permission.Delete)End PropertyPublic Property Let Delete(arg)Call SetValue(Permission.Delete, arg)End PropertyPublic Property Get Value()Value = intValueEnd PropertyPublic Property Let Value(arg)intValue = argEnd PropertyPublic Function GetValue(intType)GetValue = (Value and intType) = intTypeEnd FunctionPublic Sub SetValue(intType, boolValue)IF (boolValue) ThenValue = Value Or intTypeElseValue = Value And (Not intType)End IFEnd SubEnd Class 运用示例代码: Dim Permission : Set Permission = new PermissionTypeDim PermissionSet : Set PermissionSet = new PermissionSetComponentPermissionSet.Value = 0w("Read:")PermissionSet.Read = falsew(PermissionSet.Value &" "& PermissionSet.Read)PermissionSet.Read = truew(PermissionSet.Value &" "& PermissionSet.Read)w("Write:")PermissionSet.Write = falsew(PermissionSet.Value &" "& PermissionSet.Write)PermissionSet.Write = truew(PermissionSet.Value &" "& PermissionSet.Write)w("Delete:")PermissionSet.Delete = falsew(PermissionSet.Value &" "& PermissionSet.Delete)PermissionSet.Delete = truew(PermissionSet.Value &" "& PermissionSet.Delete)Function w(o)Response.Write("<br />"& o)End Function 今天的课程就到这里, 大家可以举一反三, 下课... 。
最后此篇关于基于逻辑运算的简单权限系统(原理,设计,实现) VBS 版的文章就讲到这里了,如果你想了解更多关于基于逻辑运算的简单权限系统(原理,设计,实现) VBS 版的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。
25
4
0
当我尝试加载库 Raster 时，我收到如下错误: 错误:inDL(x, as.logic(local), as.logic(now), ...) 中的“raster”的包或命名空间加载失败:无法加载
当我尝试加载库 Raster 时，我收到如下错误: 错误:inDL(x, as.logic(local), as.logic(now), ...) 中的“raster”的包或命名空间加载失败:无法加载
望着help section about_Comparison_Operators of PowerShell我是这样理解的: PS C:\> $false,$false -eq $true PS C
我刚刚修改了旧代码，现在似乎没有任何效果。请您指导我哪里出错了。 一些不起作用的事情是: 以前，焦点始终停留在屏幕上唯一的输入字段上。 (现在不行了)，代码中的 if else 条件也不起作用。 On
请帮我找到一个使用普通 'ol javascript 的解决方案(我无法使用外部框架)。此外，CSS :hover 选择器不适用于现实世界的实现。 注册事件发生的事情设置所有调用最后注册事件数组项。
我想创建一个软件来为残障 child 交通规划公交路线(及其最佳载客量)。 这些总线具有以下规范: m 个座位(最多 7 个 - 因为有司机和助理) o 轮椅“座位”(最多 4 个) 固定的最大负载量
有人能帮我吗？似乎我的 for 逻辑根本不起作用，因为它一直在上午 12:00 返回我的开始时间 这是我的代码 Sub forlogic() Dim i As Single Dim t
我正在尝试设置 OR两个切片器过滤器之间的逻辑。两个切片器来自相同的数据集。以下是更多详细信息: 我的源表: 带切片器的视觉效果: 我的目标是，如果我从切片器 1 和切片器 2 中选择任何值，我的视觉
我有以下 C 语句: int res = x & (x ^ y); 有没有办法做同样的事情，但每次只使用一次x和y？ 例如: x | (~x & y) == x | y 最佳答案 是的，通过扩展 xo
我正在创建 Azure 逻辑应用程序以将新的 Sharepoint 文件添加到 Azure Blob。 Sharepoint 由我的公司运行，我使用我的凭据登录来为逻辑应用程序创建 Sharepoin
我有一个问题要求为给定函数合成最简单的乘积表达式总和。基本上，如果 AB == CD，则函数为 1，否则为 0，结果如下: (!A && !B && !C && !D) || (!A && B &&
我正在尝试确定是否可以在不溢出的情况下计算两个 32 位整数的总和，同时仅使用某些按位运算符和其他运算符。因此，如果整数 x 和 y 可以相加而不会溢出，则以下代码应返回 1，否则返回 0。 ((((
处理乍一看需要许多嵌套 if 语句的复杂业务逻辑的好方法是什么？ 例子: 折扣券。可能: 1a) 超值折扣 1b) 百分比折扣 2a) 正常折扣 2b) 累进折扣 3a) 需要访问优惠券 3b) 不需
假设我有一个“numbers”对象数组，其中包含“startNo”整数和“endNo”整数。 数组中可以有多个“数字”，我想获取一个包含修改对象的新数组，该数组仅具有不重叠的范围。 例如:如果数组有:
我在这个问题上遇到了困难。我正在使用 JavaScript。 我有一个文本区域，用于检测 @ 输入并将其位置存储在数组中。 var input = "@a @b @c" //textarea var
默认 IN 使用 OR 基本逻辑。有没有办法在范围内使用 AND 基本逻辑。 例如下面的查询 SELECT ItemId,CategoryID FROM ItemCategories WHERE Ca
我想在您将鼠标悬停在网站图像上时添加叠加层。我在这里实现了这个，它工作正常http://jsfiddle.net/stujLbjh/ 这是js代码: var divs = document.query
这个问题在这里已经有了答案: Which is faster: x>2 是否比 x>>31 快？换句话说，sar x, 2 是否比 sar x, 31 快？我做了一些简单的测试，他们似乎有相同的速度
我有grails criteriaQuery，我在这里再次检查OR逻辑，就像这样一个状态变量: or { eq("status", Status.ONE) eq("status",
我有grails criteriaQuery，我在这里再次检查OR逻辑，就像这样一个状态变量: or { eq("status", Status.ONE) eq("status",
我是一名优秀的程序员,十分优秀！