Foxtable(狐表) → 用户栏目 → 专家坐堂 → 隐藏菜单问题


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

主题：隐藏菜单问题
帅哥哟，离线，有人找我吗？
edisontsui
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		隐藏菜单问题  发帖心情 Post By：2018/1/3 16:46:00 [显示全部帖子]

我想实现如下目标：当“营销”这个组别的人进入系统并且在使用含有“开料表”三个字的数据表时，就隐藏“重置列”这个菜单。afteropenproject 的代码如下:

If User.Group = "营销" 
        Dim name As String = CurrentTable.name
    if name.Contains("开料单") Then
        RibbonTabs("Table").Groups("column").Items("reset").Visible = False
    Else
        RibbonTabs("Table").Groups("column").Items("reset").Visible = True
    End If
end if

但是我用“营销”这个组别的用户名登陆之后，发现还是能够看见“重置列”这个菜单。这是为什么呢? 谢谢。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/3 18:06:00 [显示全部帖子]

我在 Maintablechanged 里面使用下列代码

If User.Group = "营销" 
    Select Case MainTable.name
        Case "弯头开料单","直身开料单","珠江弯头开料单","珠江直身开料单"
        RibbonTabs("Table").Groups("column").Items("reset").Enabled = False
    End Select
End If

但是设置好后登陆是会警告：不存在名为column的功能组。
这是问什么呢？谢谢。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/3 18:37:00 [显示全部帖子]

我在 Maintablechanged 里面使用下列代码

If User.Group = "营销" 
    Select Case MainTable.name
        Case "弯头开料单","直身开料单","珠江弯头开料单","珠江直身开料单"
        RibbonTabs("Table").Groups("column").Items("reset").Enabled = False
    End Select
End If
但是测试时没有达到效果。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/4 13:07:00 [显示全部帖子]

我改了一下代码，而且也留意菜单名称的大写问题了，但还是没有效果：

If User.Group = "营销" 
    Select Case MainTable.Name
        Case "弯头开料单","直身开料单","珠江弯头开料单","珠江直身开料单"
        RibbonTabs("Table").Groups("Column").Items("Reset").Visible = False
        Case Else
        RibbonTabs("Table").Groups("Column").Items("Reset").Visible = True
    End Select
End If
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/4 15:58:00 [显示全部帖子]

我用营销那个组别的用户登陆，警告框出现“营销”两个字，我点击“确定”后出现“物料字典” （备注：物料字典是另外一个数据表），再按“确定”后，出现“2”。

 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/4 16:00:00 [显示全部帖子]

再按“确定”后，警告框消失，但是系统也死机了。

 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/5 9:02:00 [显示全部帖子]

为什么老是无法上传附件呢？

 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/5 9:05:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:生产运作(20150105).rar

这是项目文件。开发这密码：88801
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/5 9:17:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:production.rar

这是数据库文件。请帮忙测试一下。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2018/1/5 9:18:00 [显示全部帖子]

用户名：Test

 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05078 秒, 7 次数据查询