以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  动态目录树筛选  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=124877)

--  作者:happy2010
--  发布时间:2018/9/15 13:11:00
--  动态目录树筛选

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180915125603.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180915125537.jpg
图片点击可在新窗口打开查看
请教老师,我有一个物料表,和一个明细表,
想在明细表中 根据已经选定的供应商 在物料类型生成动态目录树,目录树是从物料表中筛选相对应的供应商 物料类型 材料 材质 单位 单价等信息 转移到明细表中。
筛选条件不知道该怎么写,请老师帮助。

If e.Col.Name = "物料类型" Then
    Dim tb As New DropTreeBuilder
        tb.SourceTable = DataTables("物料表") \'指定目录树表
        tb.TreeCols = "物料类型|材质|规格" \'指定用于生成目录树的列
       tb.SourceCols = "材质|规格|单位|单价" \'指定数据来源列
    tb.ReceiveCols = "材料_材质|材料_材规|单位|单价" \'指定数据接收列
        Tables("物料明细表").Cols("物料类型").DropTree = tb.Build()
End If

[此贴子已经被作者于2018/9/15 13:13:01编辑过]

--  作者:有点蓝
--  发布时间:2018/9/15 14:46:00
--  
tb.TreeFilter = "供应商=\'" & e.row("供应商") & "\'"
--  作者:happy2010
--  发布时间:2018/9/15 15:16:00
--  
谢谢老师 指点。