Foxtable(狐表)用户栏目专家坐堂 → [求助]多个根节点筛选树


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

主题:[求助]多个根节点筛选树

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


加好友 发短信
等级:婴狐 帖子:45 积分:317 威望:0 精华:0 注册:2016/12/28 17:19:00
[求助]多个根节点筛选树  发帖心情 Post By:2017/4/20 11:00:00 [只看该作者]

请教老师,我的表里有(项目名称、三级类别、存储日期)我按照帮助中,将“类别一、类别二、类别三”进行内容筛选(此需求已经实现),但同时需要再增加一个按照“存储日期”分类的“项目名称”根节点,和现在的类别的节点分开,试了几遍一直都无法实现,请叫老师指点,谢谢!

现有的:
NodeMouseClick:

Dim Filter As String
Dim dr As DataRow = e.Node.DataRow '获取生成此节点的行
If e.Node.Text <> "显示所有行" Then
    Select Case e.Node.Level
        Case 0
            Filter = "[类别一] = '" & dr("类别一") & "'"
        Case 1
            Filter = "[类别一] = '" & dr("类别一") & "' And [类别二] = '" & dr("类别二") & "'"
        Case 2
            Filter = "[类别一] = '" & dr("类别一") & "' And [类别二] = '" & dr("类别二") & "' And [类别三] = '" & dr("类别三") & "'"        
    End Select    
End If
Tables("项目表").Filter = Filter


[此贴子已经被作者于2017/4/20 13:04:01编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 11:05:00 [只看该作者]

 做个具体的实例上传上来测试。

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


加好友 发短信
等级:婴狐 帖子:45 积分:317 威望:0 精华:0 注册:2016/12/28 17:19:00
  发帖心情 Post By:2017/4/20 11:25:00 [只看该作者]

以下是引用有点色在2017/4/20 11:05:00的发言:上传一测试实例,请老师指点。
 做个具体的实例上传上来测试。


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 11:26:00 [只看该作者]


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


加好友 发短信
等级:婴狐 帖子:45 积分:317 威望:0 精华:0 注册:2016/12/28 17:19:00
  发帖心情 Post By:2017/4/20 13:05:00 [只看该作者]

怎么传了好几次都传不上去呢!


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 14:29:00 [只看该作者]

以下是引用lq06260在2017/4/20 13:05:00的发言:

怎么传了好几次都传不上去呢!

 

要用IE浏览器访问论坛,单独做一个例子发上来,大小不要超过2M


 回到顶部