以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]我想要的统计表如何实现  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70082)

--  作者:yxh7508
--  发布时间:2015/6/15 17:02:00
--  [求助]我想要的统计表如何实现
表A是原文件.统计表是表A统
图片点击可在新窗口打开查看此主题相关图片如下:表a.png
图片点击可在新窗口打开查看
计出来的.  表A里的姓名按工序 件数  统计在一起.如统计表图片
--  作者:yxh7508
--  发布时间:2015/6/15 17:04:00
--  
怎么只有一张图片
图片点击可在新窗口打开查看此主题相关图片如下:统计表.png
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2015/6/15 17:07:00
--  
 上传foxtable项目
--  作者:yxh7508
--  发布时间:2015/6/15 19:24:00
--  
这个是FOXTABLE项目.谢谢大神们.看看能不能实现
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


--  作者:狐狸爸爸
--  发布时间:2015/6/15 20:13:00
--  
可以很方便地实现:

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb



--  作者:y2287958
--  发布时间:2015/6/15 23:44:00
--  
如果对sql语句不熟悉的话,也可以foxtable现有知识,也很简单。

Dim b As New SQLGroupTableBuilder("统计表1","表A")
Dim d As fxDataSource
b.Groups.AddExp("姓名","前片")
b.Totals.AddExp("前片","件数")
d = b.BuildDataSource()

Dim lms As String = "后片|四线|车线"
For Each lm As String In lms.Split("|")
    Dim b1 As New SQLGroupTableBuilder("统计表1","表A")
    Dim d1 As fxDataSource
    b1.Groups.AddExp("姓名",lm)
    b1.Totals.AddExp(lm,"件数")
    d1 = b1.BuildDataSource()
    d.Combine("姓名",d1,"姓名")
Next
d.Show("统计表1")
Tables("统计表1").AutoSizeCols
MainTable = Tables("统计表1") \'打开生成的统计表

[此贴子已经被作者于2015/6/15 23:43:54编辑过]

--  作者:yxh7508
--  发布时间:2015/6/16 21:12:00
--  

很感谢大神们的帮助,我下载下来怎么打不开你们的项目.2014版本和2012的版本都打不开


--  作者:大红袍
--  发布时间:2015/6/16 21:15:00
--  

 你用的是2012版的盗版做的项目。

 

 你用的是开发版,你只有购买开发版才能打开。

 

 导出代码自己看一下

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建 文本文档.txt


--  作者:yxh7508
--  发布时间:2015/6/16 22:01:00
--  

谢谢大红袍,你真神,用你的代码一下就实现了,看过你在论坛帮助过很多人.你一定是个大好人.再次的感谢


--  作者:yxh7508
--  发布时间:2015/6/16 22:03:00
--  
我想做一个服装ERP系统不知道怎么收费的/