- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 谁会做这样的目录树 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=26032)
-- 发布时间：2012/11/22 15:54:00
-- 谁会做这样的目录树
觉得很实用,但一时做不来。项目中有三个窗口，分别是目录树的不同功能需求
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:产品代码.table |
-- 发布时间：2012/11/22 16:07:00
--
由目录树生成数据表的情况应该很少遇到吧？
[此贴子已经被作者于2012-11-22 16:07:33编辑过]
-- 发布时间：2012/11/22 16:17:00
--
有需要,这里有个简单的
DataTables("表A").DataRows.Clear
Dim trv As WinForm.TreeView = Forms("目录树→表A").Controls("TreeView1")
Dim t As Table = Tables("表A")
Dim n As Integer
For Each nd As WinForm.TreeNode In trv.AllNodes
Dim r As Row = t.AddNew
r(t.cols(0)) = t.Rows(n)(0)
\'r(t.cols(1)) = t.Rows(n)(1)
\'r(t.cols(2)) = t.Rows(n)(2)
r(t.cols(nd.Level)) = nd.Text
n = t.Rows.Count -1
Next
DataTables("表A").DeleteFor("规格 is Null ")
但我想要1楼的功能
[此贴子已经被作者于2012-11-22 16:19:12编辑过]
-- 发布时间：2012/11/22 16:36:00
--
用目录生成表其实很实用，很多不熟悉数据库的录入员，看见表格就头晕，尤其是树状结构用表格体现出来更晕啦，相比之下建一棵树在上面增增减减就容易理解和形象的多。同求同求此代码，，望高手们帮忙啊。
-- 发布时间：2012/11/22 17:16:00
--
做了一个雏形的，楼主自己修改着使用。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:产品代码.table |
-- 发布时间：2012/11/22 20:14:00
--
呵,窗口1和窗口2没问题,窗口3有点难度,就是要把第3级目录拆分成四列:130202053 低压电缆 VV 3*150+1*70 对应列: 产品代码 产品分类 型号 规格,望大侠帮忙解决
-- 发布时间：2012/11/22 20:28:00
--
第三个，只能是自己做一个下拉窗口解决了。
-- 发布时间：2012/11/23 6:40:00
--
以下是引用实话实说在2012-11-22 20:14:00的发言：
呵,窗口1和窗口2没问题,窗口3有点难度,就是要把第3级目录拆分成四列:130202053 低压电缆 VV 3*150+1*70 对应列: 产品代码 产品分类 型号 规格,望大侠帮忙解决
呵,窗口1和窗口2没问题,窗口3有点难度,就是要把第3级目录拆分成四列:130202053 低压电缆 VV 3*150+1*70 对应列: 产品代码 产品分类 型号 规格,望大侠帮忙解决
搞定