以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]窗口统计代码在内部表转为外部数据源后出现异常? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53607) |
-- 作者:feiyu988 -- 发布时间:2014/7/11 15:19:00 -- [求助]窗口统计代码在内部表转为外部数据源后出现异常? 窗口统计在数据源为内部表时正常,项目改为局域网类型后在最后出现“未将对象引用设置到对象的实例。”错误,应该是出现在"Tables("分站区统计_Table1").DataSource = b.BuildDataSource()"这一句,不知道是什么原因? Dim sql As String = "Select 单位工程名称,编号,单位,备注,规格型号,材料名称,代号,类别,材质,{安装图零件明细}.数量*{分项图号}.数量 As [数量] From {分项图号} Inner JOIN {安装图零件明细} ON {安装图零件明细}.[二级图号] = {分项图号}.[二级图号]" Dim b As New CrossTableBuilder("统计表1",sql) b.HGroups.AddDef("类别") b.HGroups.AddDef("编号") b.HGroups.AddDef("材料名称") b.HGroups.AddDef("代号") b.HGroups.AddDef("规格型号") b.HGroups.AddDef("材质") b.HGroups.AddDef("备注") b.HGroups.AddDef("单位") b.VGroups.AddDef("单位工程名称") b.Totals.AddDef("数量") b.HorizontalTotal = True \'b.VerticalTotal = True Tables("分站区统计_Table1").DataSource = b.BuildDataSource() Tables("分站区统计_Table1").Sort = "类别,材料名称,规格型号"
|
-- 作者:有点甜 -- 发布时间:2014/7/11 15:21:00 -- Dim b As New CrossTableBuilder("统计表1",sql,"外部数据源名字") |
-- 作者:feiyu988 -- 发布时间:2014/7/11 15:27:00 -- OK,问题解决!另外请教一下,上例中生成的“单位工程名称‘各列怎样排序呀? |
-- 作者:有点甜 -- 发布时间:2014/7/11 15:33:00 -- 以下是引用feiyu988在2014-7-11 15:27:00的发言:
OK,问题解决!另外请教一下,上例中生成的“单位工程名称‘各列怎样排序呀?
生成以后,对Tables("分站区统计_Table1")的列进行一下移动处理即可
http://www.foxtable.com/help/topics/1437.htm
|