老大帮忙看一下吧,正在做一个基于企业微信的合同查询项目,这段是在做一个合同额的分段统计
Dim g As New GroupTableBuilder("htfdhz", DataTables("ht"))
g.Caption = "合同分段汇总"
g.Groups.AddDef("zjfd")
g.Totals.AddDef("F_252", AggregateEnum.Count, "数量")
g.Totals.AddDef("F_252", "金额")
g.SubTotal = True
g.GroupProportion = True
g.GrandProportion = True
g.Filter = flt & " And [F_275] <> '' and [F_696] = ''"
g.Build()
第一个问题,g.Build()中如果使用了True属性不生成table并自动销毁,后面.CreateFromDataTable时会出错,提示找不到数据表,这个怎么解决?挂在系统里一个临时表看着就难受.
Dim wb As New WeUI
With wb.AddTable("","Table1")
.Primarykey = "zjfd"
.ActiveSheet = "menu"
.CreateFromDataTable(DataTables("htfdhz"),False)
第二个问题,因为前面不能使用True属性,干脆这里使用了.CreateFromTable来生成表格,省的再手工添加合计行了.结果发现使用.CreateFromDataTable生成,.Primarykey是起作用的,如果使用.CreateFromTable,.Primarykey就无效了,怎么解决?
End With
With wb.AddActionSheet("","menu") '设计菜单
.Add("display", "查看详细").Attribute="" '调用js函数
.Add("mnuCancel","取消","",True)
End With
wb.AppendHTML("<script src='./lib/table.js'></script>") '引入脚本文件
e.writestring(wb.Build)
[此贴子已经被作者于2020/12/17 17:57:05编辑过]