Foxtable(狐表)用户栏目专家坐堂 → [求助]为具体操作设置权限无效


  共有7555人关注过本帖树形打印复制链接

主题:[求助]为具体操作设置权限无效

帅哥哟,离线,有人找我吗?
青阳网
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:95 威望:0 精华:0 注册:2012/12/15 0:39:00
[求助]为具体操作设置权限无效  发帖心情 Post By:2012/12/15 15:57:00 [只看该作者]

为具体操作设置权限

不仅是查看和编辑,Foxtable中任何操作都可以进行授权设置,例如移动列,移动行、删除行、锁定行、调整列宽和列位置等等。

假定有个表,要求只有张经理才能锁定或取消锁定行,可以将表的DataRowLockedChanging事件设置为:

If User.Name <> "张经理" Then
    e.Cancel =
True
    Messagebox.show(
"你无权锁定和取消锁定行!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End
If

 

 

按帮助文件的说明在 表属性--事件--DataRowLockedChanging的代码编辑器里面输入上面的代码无效.切换到其他用户仍然可以锁定和解锁行


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/15 16:04:00 [只看该作者]

 不可能的,只要执行了 e.Cancel = True,就不能解锁的。

 是否你的代码有误?

 回到顶部
帅哥哟,离线,有人找我吗?
青阳网
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:95 威望:0 精华:0 注册:2012/12/15 0:39:00
  发帖心情 Post By:2012/12/15 16:05:00 [只看该作者]

谢谢楼上的解答,是这样的哦,我完全复制帮助文件的代码,应该不会有错误


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/15 16:11:00 [只看该作者]

 那你试一下代码只写入

 e.Cancel = True

 这样,谁都不能解锁了。

 回到顶部
帅哥哟,离线,有人找我吗?
青阳网
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:95 威望:0 精华:0 注册:2012/12/15 0:39:00
  发帖心情 Post By:2012/12/15 16:16:00 [只看该作者]

试了下 e.Cancel = True 也没有起到作用


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/15 16:32:00 [只看该作者]

 呃,我测试正常,不可能可以解锁的,别忽悠我。

 回到顶部
帅哥哟,离线,有人找我吗?
青阳网
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:95 威望:0 精华:0 注册:2012/12/15 0:39:00
  发帖心情 Post By:2012/12/15 16:34:00 [只看该作者]

真是这样哦,我把QQ通过站内信发给你了,你可以远程看看


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/15 16:39:00 [只看该作者]

 联系我吧。800014337,说找小林。

 回到顶部
帅哥哟,离线,有人找我吗?
青阳网
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:6 积分:95 威望:0 精华:0 注册:2012/12/15 0:39:00
  发帖心情 Post By:2012/12/15 17:05:00 [只看该作者]

感谢 小林 的帮助,确实是虚拟机的缘故 ,我在真实机器上测试就可以了


 回到顶部