- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]分页加载显示统计对应计数条数 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138525)
-- 发布时间：2019/8/2 17:13:00
-- [求助]分页加载显示统计对应计数条数
老师好:
为了提高用户办公效率,简单直观办公,需要及时汇总显示订单跟踪进度,请老师帮完善一下这个模块(已参考帮助文件:在筛选树显示统计数据 没有成功)
1.划分分页加载/可折叠展开+2.可调每页显示条数+3.一键自动汇总显示(1和2已基本完善)
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:分页加载树显示后台统计计数条数20190802测试.table |
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:订单.zip |
此主题相关图片如下：搜狗截图20190802171922.jpg
谢谢老师!
[此贴子已经被作者于2019/8/5 18:03:55编辑过]
-- 发布时间：2019/8/2 17:44:00
--
参考：http://www.foxtable.com/webhelp/topics/2741.htm
-- 发布时间：2019/8/2 18:28:00
--
谢谢老师,已经从前天看到今天,单个功能可以参考帮助实现,几种功能合在一起搞不定,请老师再帮看看,谢谢!
-- 发布时间：2019/8/2 20:43:00
--
用法完全一样没看出来有什么区别
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT 年,结单,年月,产品,客户,雇员 From {订单}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt,"年|结单|年月|产品|客户|雇员")
\'加载第一页数据
For Each nd As WinForm.TreeNode In trv.AllNodes
Dim Year As String = nd.DataRow("年")
Dim jd As String = nd.DataRow("结单")
Select Case nd.Level
Case 0
nd.Text = nd.text & "(" & dt.Compute("Count(产品)","年 = \'" & Year & "\'") & "条)"
Case 1
nd.Text = nd.text & "(" & dt.Compute("Count(产品)","年 = \'" & Year & "\' And 结单 = \'" & jd & "\'" ) & "条)"
End Select
Next
trv.Nodes.Insert("加载所有数据",0)
-- 发布时间：2019/8/3 12:30:00
--
谢谢有点蓝老师,这个功能可以对接使用了,结合交期余下天数使用,对PMC计划/跟踪,对采购供应商交期管理及业助客户交期管理有着极大的帮助作用!!!(测试并且可以实现条数和数量同时计算带出显示)
刚开始计算不准确,加上SQL就可以准确计算了,只是计算节点层数不能太多,2层基本没影响,如果计算3层以上就比较耗时间.
(实际测试:订单数据6万多条,动态加载每页5200行,计算1-2层,基本感觉不到时间变化,计算3层时间2秒多,计算4层接近6秒,计算5层要10多秒,计算6层32秒左右),要是能突破计算时间,都能控制在2秒左右,就完美了!!!)
十分感谢!!!
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:多节点计算.txt |
此主题相关图片如下：搜狗截图20190803122503.jpg
[此贴子已经被作者于2019/8/7 10:50:17编辑过]