- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 三表连接，横向排列 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123352)
-- 发布时间：2018/8/13 8:26:00
-- 三表连接，横向排列
将配料表、配色表、配量表合并成一张表，用哪个方法，怎么写？（款式颜色和款式尺码是动态的）
[此贴子已经被作者于2018/8/14 17:45:38编辑过]
-- 发布时间：2018/8/13 8:50:00
--
参考
http://www.foxtable.com/webhelp/scr/2965.htm
上面的转水平表的代码，拷贝两份即可。不会做上传具体项目测试。
-- 发布时间：2018/8/13 10:44:00
--
Dim dtb As New DataTableBuilder("大货用量表_横向配色表")
dtb.AddDef("物料名称", Gettype(String), 32)
For Each v As String In DataTables("配色表").GetValues("颜色信息")
dtb.AddDef(v, Gettype(String))
Next
dtb.Build()
For Each v As String In DataTables("配色表").GetValues("物料名称")
Dim dr1 As DataRow = DataTables("大货用量表_横向配色表").AddNew()
dr1("物料名称") = v
For Each dr2 As DataRow In DataTables("配色表").Select("物料名称 = \'" & v & "\'")
dr1(dr2("颜色信息")) = dr2("配色信息")
Next
Next
上面这段代码提示：大货用量表_横向配色表 不存在名为“第一列”的列
-- 发布时间：2018/8/13 11:32:00
--
上传具体实例测试
-- 发布时间：2018/8/13 11:45:00
--
sql sever外部表上实例？
[此贴子已经被作者于2018/8/13 11:44:57编辑过]
-- 发布时间：2018/8/13 11:52:00
--
导出表格，单独做一个项目，导入表格发上来。
-- 发布时间：2018/8/13 12:10:00
--
[此贴子已经被作者于2018/8/14 17:46:01编辑过]
-- 发布时间：2018/8/13 12:24:00
--
你给的例子，我执行3楼代码，没问题，请说明如何测试出错。
-- 发布时间：2018/8/13 14:10:00
--
没有测试数据，我现在把数据放进来了
[此贴子已经被作者于2018/8/14 17:46:17编辑过]
-- 发布时间：2018/8/13 14:36:00
--
测试没问题啊
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目7 (2).foxdb |