以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何设置代码从数据表中获得目录树字符串,并赋值给变量s？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=66095)
--  作者：jswjyjf
--  发布时间：2015/3/30 10:16:00
--  如何设置代码从数据表中获得目录树字符串,并赋值给变量s？
如何设置代码从数据表中获得目录树字符串,并赋值给变量s？
--  作者：有点甜
--  发布时间：2015/3/30 10:17:00
--  
 呃你想问什么
--  作者：jswjyjf
--  发布时间：2015/3/30 10:21:00
--  

Dim s As String
\'请在这里设置代码从数据表中获得目录树字符串,并赋值给变量s
Dim tb As New DropTreeBuilder
tb.TreeString = s \'设置目录树字符串
tb.ReceiveCols = "大类|二类|三类" \'指定数据接收列
Tables("订单").Cols("大类").DropTree = tb.Build()

 

这里的\'请在这里设置代码从数据表中获得目录树字符串,并赋值给变量s
如何写代码
--  作者：有点甜
--  发布时间：2015/3/30 10:23:00
--  

 你不能用另一个方法么？

 

Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("行政区域") \'指定目录树表
tb.TreeCols = "省|县市" \'指定用于生成目录树的列
tb.ReceiveCols = "省|县市" \'指定数据接收列
Tables("客户").Cols("省").DropTree = tb.Build()
--  作者：Bin
--  发布时间：2015/3/30 10:25:00
--  
当你存为字符串的时候,才使用从字符串生成这个方法.