- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]关于列表项目多选项的交叉统计问题？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=96014)
-- 发布时间：2017/2/10 14:55:00
-- [求助]关于列表项目多选项的交叉统计问题？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.foxdb |
项目中的交叉统计设置中有保存了想要达到的效果，就是“入库容器”列下拉有多个筛选，然后对这多个筛选的选项，根据客户、时间、工序进行统计，并在统计表中建一列“容器结余”，“容器结余”=“入库容器”-“出库容器”。
应该怎么写？
-- 发布时间：2017/2/10 15:33:00
-- 不能沉啊？
不能沉啊？
-- 发布时间：2017/2/10 15:39:00
--
Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("客户", Gettype(String), 16)
Dim prds As List(of String) = DataTables("啊啊").GetValues("入库容器", "入库容器 is not null")
For Each prd As String In prds
dtb.AddDef(prd & "_入库", Gettype(Double))
dtb.AddDef(prd & "_出库", Gettype(Double))
dtb.AddDef(prd & "_结余", Gettype(Double))
Next
dtb.Build()
For Each cus As String In DataTables("啊啊").GetValues("客户")
Dim dr As DataRow = DataTables("统计").AddNew()
dr("客户") = cus
For Each prd As String In prds
dr(prd & "_入库") = DataTables("啊啊").Compute("Sum(入库)","客户 = \'" & cus & "\' And [入库容器] = \'" & prd & "\'")
dr(prd & "_出库") = DataTables("啊啊").Compute("Sum(出库)","客户 = \'" & cus & "\' And [入库容器] = \'" & prd & "\'")
dr(prd & "_结余") = dr(prd & "_入库") - dr(prd & "_出库")
Next
Next
MainTable= Tables("统计")
-- 发布时间：2017/2/10 15:43:00
-- 这样子，还是临时表？
这样子，还是临时表？希望得到的是数据表！
-- 发布时间：2017/2/10 16:04:00
--
以下是引用fengwenliuyan在2017/2/10 15:43:00的发言：
这样子，还是临时表？希望得到的是数据表！
这样子，还是临时表？希望得到的是数据表！
你把表格导出，然后导入，就是数据表了。
-- 发布时间：2017/2/10 16:05:00
--
或者，参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=95901&skin=0
-- 发布时间：2017/2/10 16:17:00
-- 导出再导入，做不到即时同步？
导出再导入，做不到即时同步？
-- 发布时间：2017/2/10 16:21:00
--
以下是引用fengwenliuyan在2017/2/10 16:17:00的发言：
导出再导入，做不到即时同步？
导出再导入，做不到即时同步？
即时同步，就应该用临时表来做。
如果你要弄成数据表，参考6楼的方式。
-- 发布时间：2017/2/10 16:22:00
--
如果你的列，是固定的。建议这样做
http://www.foxtable.com/webhelp/scr/0681.htm
-- 发布时间：2017/2/10 16:28:00
-- 我做了新的数据表，怎么用代码导入这些数据，达到之前统计表的效果？
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目2.foxdb |
我做了新的数据表，怎么用代码导入这些数据，达到之前统计表的效果？