以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何根据多值字段生成筛选树  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62371)

--  作者:avatarasdf
--  发布时间:2014/12/30 16:29:00
--  如何根据多值字段生成筛选树
各位老师,

帮忙看下如何根据多值字段(如附件中的工厂列),生成相应筛选树

比如点击筛选树节点:

工厂1 ,  可以筛选出产品A,C,D
工厂2 ,  可以筛选出产品A,C,F,G
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:如何根据多值字段生成筛选树.foxdb


谢谢!

--  作者:有点甜
--  发布时间:2014/12/30 17:14:00
--  

 加一个表C,存储反转的值

 

\'\'\'
DataTables("表C").DataRows.Clear
Dim cr() As Char = {",", ","}
For Each dr As DataRow In DataTables("表B").Select("能做工厂 is not null")
    For Each s As String In dr("能做工厂").split(cr)
        Dim ndr As DataRow = DataTables("表C").AddNew
        ndr("第一列") = s
        ndr("第二列") = dr("产品名称")
    Next
Next