Foxtable(狐表)用户栏目专家坐堂 → 4月25日更新,帮助加入权限管理、内部通讯、工作流等内容


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

主题:4月25日更新,帮助加入权限管理、内部通讯、工作流等内容

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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/25 23:27:00 [显示全部帖子]

这些代码试过N次了,有问题呀,出现同名时或多个表时会出现不成功的现象!

Select Case User.Name
    Case "小林","小赵"
        Tables("记帐本").Visible = False
   Case "小赵","小潘"
        Tables("五金出库管理").Visible = False
   Case "小赵","小潘"
        Tables("五金入库管理").Visible = False
    Case "小潘","小林"
        Tables("成品库管理").Visible = False
  End Select

这个代码,当我用《小潘》这个用户进去的话,还是会出现《成品库管理》《五金入库管理》也就是说只有第一个《五金出库管理》看不到,不知道是为什么

 

在比如:

 

Select Case e.DataTableName
   
Case "表A" ,“表C”
        e.Cancel = (e.User.Name =
"张三")
   
Case "表B", "表C" 
         e.Cancel = (e.User.Name =
"李四")
   
Case "表C" ,“表A”
        e.Cancel = (e.User.Name =
"王五")
End
Select

这个代码,如果我想让张三不加载《表A,表C》的话,这个可以,但如果李四进去的话,就又会出现问题,就是说他会把《表C》也加载进来,下面的同理,有重复的反正都会出问题,不知道什么回事


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/25 23:59:00 [显示全部帖子]

我就是按照我的需要更改,可是你看到我那上面的,老有问题,

比如第一段代码我只想 让小潘看到记帐本这个表,但按照上面的代码的话我还可以看到《成品库管理》《五金入库管理》这两个表

第二段代码,我只想要让李四,看到表A,可是按照上面的代码,表C也能看得到


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/26 18:49:00 [显示全部帖子]

Select Case e.DataTableName
    Case “表A”,“表B”,“表C”

        e.Cancel = (e.User.Name = "小潘")
End Select
Select Case e.DataTableName
    Case "表D“,"表C“,“表B”

        e.Cancel = (e.User.Name = "小赵")
End Select
Select Case e.DataTableName
    Case “表A”,“表B”,“表D”

        e.Cancel = (e.User.Name = "小林")
End Select

那上面这段代码又是哪里出现问题了,如果我用小潘这个用户进去,表表会全部加载,真是晕死


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/27 20:35:00 [显示全部帖子]

其实多个表不加载的话,有没有只加载某个表的代码,好比如,我这个小潘用户,只要加载“表A”就行了,而用小林这个用户只加载”表B“这个样子。。。。。

感觉这样子会比较实用


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/27 22:08:00 [显示全部帖子]

这个代码你好像没有讲过,嘿嘿,如果小潘只加载“表A”,而小林要加载“表B”表C“表D”表E“,要把生成这样的代码,难道不是在代码后面(”表B“,”表C“,表D,”表E)


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/28 22:32:00 [显示全部帖子]

没有时间看呀,其实我是很想学习,我对这只狐狸很喜欢,当时报二级也是报VF,哈哈,可惜没有去看,最后考O分图片点击可在新窗口打开查看

如果是三个用户呢,第三个用户要加载ABCD表,这个什么做


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/29 12:28:00 [显示全部帖子]

以下是引用狐狸爸爸在2011-4-29 7:50:00的发言:

假定赵六加载ABCD,换个说法就是赵六不加载E:

 

If e.User.Name = "小潘" Then
    e.Cancel = (e.DataTableName <> "表A")
ElseIf e.User.Name = "小林" Then
    e.Cancel = (e.DataTableName = "表A")
ElseIf e.User.Name = "赵六" Then
    e.Cancel = (e.DataTableName = "表E")
End If

[此贴子已经被作者于2011-4-29 8:51:42编辑过]

 

如果赵六不加载表E和表D呢?


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/29 21:23:00 [显示全部帖子]

那小潘要加载表A和表D,表F呢


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


加好友 发短信
等级:婴狐 帖子:64 积分:548 威望:0 精华:0 注册:2011/4/18 22:31:00
  发帖心情 Post By:2011/4/30 12:50:00 [显示全部帖子]

这个权限管理的实例应该非常完整了图片点击可在新窗口打开查看

 

什么时候其他的也有这样子的全部实例,我相信真没有接触过狐表的,不懂代码的,也能轻松搞定!!!!


 回到顶部