- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- SQLCrossTableBuilder交叉统计的是fill进来的两张表提示找不到表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120567)
-- 发布时间：2018/6/19 16:04:00
-- SQLCrossTableBuilder交叉统计的是fill进来的两张表提示找不到表
此主题相关图片如下：未命名1.png
此主题相关图片如下：未命名.png
If Forms("班组分析").Opened()
Dim t As Table = Tables("班组分析_table1")
t.Fill("SELECT c.Goodsxl as 系列名, c.Gyno as 物供号, c.ZDNO as 制单号, B.Orderno as 订单号, B.MakeGro as 班组, B.Ftyno AS 款号,b.QCType as 不合格原因, Sum(Isnull(b.num,0)) as 返工件数 F ROM Qc_Main A LEFT JOIN QC_ReturnMake B ON A.ID=B.UpID left join pq_main C ON B.Orderno =C.ORDERNO WHERE C.ZDNO=\'18011514\' and Isnull(b.num,0) >0 GROUP BY c.Goodsxl,c.Gyno,c.ZDNO,B.Orderno,B.MakeGro,B.Ftyno,B.QCTYPE " , "鼎邦系统",True)
Dim t2 As Table = Tables("班组分析_table2")
t2.Fill("SELECT Makeno as 制单号,Goods as 类别, MakeQty as 制单数, CutQty as 裁剪数, InQty as 入库数 F ROM CO_SB_Main WHERE gyno LIKE \'%,170200,%\' " , "鼎邦系统",True)
End If
Dim sg As New SQLCrossTableBuilder("班组分析","班组分析_table1")
sg.AddTable("班组分析_table1","制单号","班组分析_table2","制单号")
sg.HGroups.AddDef("制单号") \'添加客户列用于水平分组
sg.VGroups.AddDef("不合格原因") \'添加产品列用于垂直分组,并设置了Pattern参数
sg.Totals.AddDef("返工件数") \'添加数量列用于统计
sg.Build \'生成统计表
-- 发布时间：2018/6/19 17:38:00
--
这种fill进来的是查询表，SQLCrossTableBuilder不支持查询表
-- 发布时间：2018/6/19 18:15:00
--
可以用crossTableBuilder处理，如
http://www.foxtable.com/webhelp/scr/2307.htm