下面这段代码是在使用内部数据源时是标准教程,可我想使用外部数据源,如用ACCESS,名字为“data”,代码如何修改能连上数据源?
Dim g As New GroupTableBuilder("业务员查询", DataTables("业务表"))
g.C
g.Filter = "业务日期>=#" & d1 & "# and 业务日期<=#" & d2 & "#"
g.Groups.AddDef("员工姓名")
g.Groups.AddDef("客户名称")
g.Totals.AddDef("发货数量", "发货_本月发生")
g.Totals.AddDef("开piao数量", "开piao数量_本月发生")
g.Totals.AddDef("开piao金额", "开piao金额_本月发生")
g.Totals.AddDef("收款金额", "收款_本月发生")
g.VerticalTotal = True
g.SubTotal = True
g.Decimals = 2
g.FromServer = True
g.Build()
Tables("业务管理_统计报表").DataSource = g.BuildDataSource()
e.Form.Controls("统计报表").Visible = True
求助!!