以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  提示列名不明确  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=39042)

--  作者:magangzmc
--  发布时间:2013/8/14 10:44:00
--  提示列名不明确
Dim b As New SQLGroupTableBuilder("统计表1","工艺卡工序操作员表")
b.C
b.AddTable("工艺卡工序操作员表","ID","工艺卡工序表","_Identify")
b.AddTable("工艺卡工序操作员表","生产单号","工艺卡主表","生产单号")
b.Groups.AddDef("{工艺卡工序操作员表}.生产单号") 
b.Groups.AddDef("投产日期",DateGroupEnum.None) 
b.Groups.AddDef("操作工编码") 
b.Totals.AddDef("实际完成数量") 
b.Subtotal =True
b.Build \'生成统计表 

Tables(e.Form.Name & "_Table1").DataSource = b.BuildDataSource

提示列名\'生产单号\'不明确
[此贴子已经被作者于2013-8-14 10:44:31编辑过]

--  作者:狐狸爸爸
--  发布时间:2013/8/14 10:50:00
--  
发文件上来测试
--  作者:Bin
--  发布时间:2013/8/14 10:51:00
--  
上个例子看看,是否名称没对,还是数据没有办法根据生产单号对应.
--  作者:狐狸爸爸
--  发布时间:2013/8/14 11:00:00
--  

我测试了下面的代码,没有问题:

 

 

Dim b As New SQLGroupTableBuilder("统计表1","工艺卡工序操作员表")
b.Connection Name = "DB"
b.AddTable("工艺卡工序操作员表","ID","工艺卡工序表","_Identify")
b.AddTable("工艺卡工序操作员表","生产单号","工艺卡主表","生产单号")
b.Groups.AddDef("{工艺卡工序操作员表}.生产单号")
b.Groups.AddDef("投产日期",DateGroupEnum.None)
b.Groups.AddDef("操作工编码")
b.Totals.AddDef("实际完成数量")
b.Subtotal =True
b.Build \'生成统计表


--  作者:magangzmc
--  发布时间:2013/8/14 11:15:00
--  
 Tables(e.Form.Name & "_Table1").DataSource = b.BuildDataSource
最后再加上这句就报错了 

--  作者:狐狸爸爸
--  发布时间:2013/8/14 11:20:00
--  

你要这个的话:

 

Tables(e.Form.Name & "_Table1").DataSource = b.BuildDataSource

 

就得删除这个:

 

b.Build \'生成统计表