Foxtable(狐表) → 用户栏目 → 专家坐堂 → 跨表统计后台数据


  共有3913人关注过本帖树形打印复制链接

主题：跨表统计后台数据
帅哥，在线噢！
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/15 10:41:00 [显示全部帖子]

"合同信息"表的数据肯定要加载才能统计。"合同信息"要统计的其它表数据如果没有加载，可以改后台统计：http://www.foxtable.com/webhelp/topics/2897.htm

 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/15 11:24:00 [显示全部帖子]

那要自己使用sql统计处理：http://www.foxtable.com/webhelp/topics/0696.htm

 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/15 13:34:00 [显示全部帖子]

"合同信息"表datacolchaged事件代码发上来

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/15 14:44:00 [显示全部帖子]

"合同信息"表datacolchaged事件没有代码，那么上面的代码就没有任何用处。RaiseDataColChanged就是用来触发"合同信息"表datacolchaged事件的

 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/15 15:02:00 [显示全部帖子]

参考：http://www.foxtable.com/webhelp/topics/2897.htm

DataTables("现金日记账").SQLCompute("Sum(收入)", Filter)
 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/16 8:37:00 [显示全部帖子]

“现金日记账”表的“datacolchangend”事件

Select Case e.DataCol.Name
    Case "价税合计","合同序号"
        Dim pr As DataRow
Dim Filter As String = "[合同序号] = '" & e.DataRow("合同序号") & "'"
        pr = DataTables("合同信息").Find(Filter)
        If pr IsNot Nothing Then
            DataTables("合同信息").DataCols("序号").RaiseDataColChanged(pr)
else
pr = DataTables("合同信息").SqlFind(Filter)
If pr IsNot Nothing Then
DataTables("现金日记账").save
    pr("收入") = DataTables("现金日记账").sqlCompute("Sum(收入)", Filter)
    pr("预计成本利润_拨款") = DataTables("现金日记账").sqlCompute("Sum(支出)", Filter)
DataTables("莱矿总包合同").save
    pr("已执行金额") = DataTables("莱矿总包合同").sqlCompute("Sum(价税合计)", Filter)
pr.save
end if
        End If
End Select
 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/16 9:23:00 [显示全部帖子]

都是直接统计的后台，刷新不刷新不影响的。最主要的是数据必要要保存，A电脑录入数据没有保存，其它电脑肯定没有办法统计

 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/16 10:13:00 [显示全部帖子]


 回到顶部
帅哥，在线噢！
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/17 8:36:00 [显示全部帖子]

试试不就知道了。请测试有什么问题再问，不要问某某方法是否可行，这个基本没有意义

 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105952 积分：538835 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/17 9:02:00 [显示全部帖子]

先看看：http://www.foxtable.com/webhelp/topics/0604.htm，不同事件有不同的e参数，按钮里是不会有e.DataRow、e.DataCol则或者东西的。

如果要放到按钮里，需要遍历加载出来的数据所有行，全部计算一遍

如果项目文件大，新建一个项目重现同样的问题，把新项目发上来
 回到顶部
总数 16 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询