编码填充 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 编码填充

共有2068人关注过本帖树形打印复制链接主题：编码填充

zhangxl1964

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：553 积分：5327 威望：0 精华：0 注册：2011/6/7 13:33:00

编码填充

Post By：2017/1/13 15:26:00 [只看该作者]

老师：你好！

请帮助查找一下下面的代码错误，没能提取数据。采用的是内部数据源

Dim gb As new SQLGroupTableBuilder("统计表1","入库单")

Dim dt As DataTable

gb.Groups.AddDef("大类")

gb.Groups.AddDef("小类")

gb.Groups.AddDef("存货编码")

gb.Groups.AddDef("物料名称")

gb.Groups.AddDef("物料规格")

gb.Groups.AddDef("物料单位")

gb.Groups.AddDef("品牌产地")

gb.Groups.AddDef("客户名称")

gb.Groups.AddDef("辅类")

gb.Totals.AddDef("数量")

gb.Totals.AddDef("金额")

gb.Filter = " {入库单}.日期 >= #" & QueryMonth & " # and {入库单}.日期 <= #" & JQueryMonth & " #"

dt = gb.Build(True) '生成一个DataTable

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/13 15:43:00 [只看该作者]

先这样写

Dim gb As new SQLGroupTableBuilder("统计表1","入库单")

Dim dt As DataTable
gb.Groups.AddDef("大类")
gb.Groups.AddDef("小类")
gb.Groups.AddDef("存货编码")
gb.Groups.AddDef("物料名称")
gb.Groups.AddDef("物料规格")
gb.Groups.AddDef("物料单位")
gb.Groups.AddDef("品牌产地")
gb.Groups.AddDef("客户名称")
gb.Groups.AddDef("辅类")
gb.Totals.AddDef("数量")
gb.Totals.AddDef("金额")
gb.Build

再这样写

Dim gb As new SQLGroupTableBuilder("统计表1","入库单")

Dim dt As DataTable
gb.Groups.AddDef("大类")
gb.Groups.AddDef("小类")
gb.Totals.AddDef("数量")
gb.Build

zhangxl1964

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：553 积分：5327 威望：0 精华：0 注册：2011/6/7 13:33:00

Post By：2017/1/13 16:09:00 [只看该作者]

解决了，谢谢！

代码没错。

下一主题 >> << 上一主题

主题：编码填充