Foxtable(狐表)用户栏目专家坐堂 → 只加载节点名字和组名字一样的表记录


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

主题:只加载节点名字和组名字一样的表记录

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4301 威望:0 精华:0 注册:2019/8/5 17:49:00
只加载节点名字和组名字一样的表记录  发帖心情 Post By:2021/2/23 10:28:00 [只看该作者]

蓝总:
窗口afterload:
Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
If user.IsRole("系统管理员") Then
tr.BuildTree("目录表", "一级目录|二级目录|三级目录|四级目录|五级目录")
Else 
tr.BuildTree("目录表", "一级目录|二级目录|三级目录|四级目录|五级目录", "二级目录 = '&User.Group&'" )
End If

除了管理员其他账户加载的目录树均没有,代码要怎么改?



 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111412 积分:567130 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/23 10:33:00 [只看该作者]

tr.BuildTree("目录表", "一级目录|二级目录|三级目录|四级目录|五级目录", "二级目录 = '" & User.Group & "'" )

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4301 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2021/2/23 10:47:00 [只看该作者]

图片点击可在新窗口打开查看我开始也是这样写的,报错

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111412 积分:567130 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/23 10:51:00 [只看该作者]

照抄2楼,&前后加上必要的空格

 回到顶部