以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  目录树生成  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=121605)

--  作者:yancheng
--  发布时间:2018/7/10 10:47:00
--  目录树生成
0_000188_000191_000248_000250_000256_000263

表中,有这样一个:列;用它生成目录树,怎么处理呢?  我感觉生成成:0   / 188/191这样的名称的目录树,是可以的。但是还得遍历这个NODE,再改名?好像挺慢的 
有没有哪种方法比较好的?
图片点击可在新窗口打开查看此主题相关图片如下:1111.png
图片点击可在新窗口打开查看

--  作者:yancheng
--  发布时间:2018/7/10 10:53:00
--  
http://www.foxtable.com/webhelp/index.htm?page=2474.htm

看到,帮助 了。生成了。

--  作者:yancheng
--  发布时间:2018/7/10 11:05:00
--  
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.GenerateTree("材料分类表","PathKey","名称", "_")
    trv.Nodes(3).Expand()



trv.Nodes(0).Text = "所有材料"
执行它时:弹错:
指定的参数已超出有效值的范围。
参数名: index


图片点击可在新窗口打开查看此主题相关图片如下:22.png
图片点击可在新窗口打开查看



--  作者:yancheng
--  发布时间:2018/7/10 11:15:00
--  
可以了。

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.GenerateTree("材料分类表","PathKey","名称", "_")
    trv.Nodes(0).ExpandAll()
trv.Nodes(0).Text = "所有材料"

--  作者:yancheng
--  发布时间:2018/7/10 11:45:00
--  
如果设置:材料表  ,的filter条件呢?
思路是:   材料表,的filter    = PathKey.StartsWith(" & e.Node.DataRow("PathKey")
但是这样写,是不对的。
要怎么写呢?
[此贴子已经被作者于2018/7/10 11:46:10编辑过]

--  作者:有点甜
--  发布时间:2018/7/10 11:48:00
--  

这个意思?

 

tables("材料表").filter = "PathKey like \'" & e.Node.DataRow("PathKey") & "%\'"

 

[此贴子已经被作者于2018/7/10 11:48:35编辑过]