以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WEUI代码咨询  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173745)

--  作者:wh420
--  发布时间:2021/12/14 14:10:00
--  WEUI代码咨询
附件为LIST页面代码,当用筛选页面起始时间条件为:某两天或两天以上做为筛选条件则正常显示汇总行,如果选2021年12月14日至2021年12月14日(即只看某一天数据)则在数据最下方没有出现汇总行,需要在哪里再加汇总代码?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档.txt



--  作者:有点蓝
--  发布时间:2021/12/14 14:30:00
--  
哪个代码是计算汇总行的?
--  作者:wh420
--  发布时间:2021/12/14 15:59:00
--  
TShouRu = dt.SQLCompute("sum(金额)","日期 >= \'" & dt1 & "\' And 日期 <= \'" & dt2 & "\' And 收支=\'收\'")
TZhiChu = dt.SQLCompute("sum(金额)","日期 >= \'" & dt1 & "\' And 日期 <= \'" & dt2 & "\' And 收支=\'支\'")
YingLi = TShouRu - TZhiChu
With .Body.AddRow()
       .Primarykey = -1 \'主键为-1时
       .AddCell( m & "月" & "盈:")
       .AddCells("","","","",YingLi)
End With


--  作者:有点蓝
--  发布时间:2021/12/14 16:49:00
--  
2个地方有这个代码

第一个判断的是If r("日期").year <> lr("日期").year OrElse r("日期").month <> lr("日期").month  Then \'遇到不同月的时候才统计行

第二个判断的是If cct = 0 Then

不显示说明都不符合条件

--  作者:wh420
--  发布时间:2021/12/14 17:13:00
--  
我需要实现的功能是:
1、在当前月的最下方显示统计行。(而不是每页的最下方)目前实现,应该就是第一个判断满足要求。
2、筛选后的结果也能达到上述要求。(未实现)

现在就是第二条功能如何实现的问题?




--  作者:有点蓝
--  发布时间:2021/12/14 17:54:00
--  
请上传实例测试
--  作者:wh420
--  发布时间:2021/12/15 14:19:00
--  
筛选结果只有一天数据时,统计行不出现。如何在循环里加个判断,来判断所有行日期都是同一天的?

图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图21年12月15日1409_1.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2021/12/15 14:18:48编辑过]

--  作者:有点蓝
--  发布时间:2021/12/15 14:36:00
--  
循环完毕,外面在加一个汇总代码即可

for each ...
添加行
....
添加一个汇总
next

最后再添加一个汇总

--  作者:wh420
--  发布时间:2021/12/15 17:16:00
--  
我就是这么做的,正常访问 LIST页面翻到最后一页时cct=0,但是一旦用了筛选功能,CCT这个变量怎么都不能得0,所以导致最后一行不能手动添加上汇总行。
请问老师,这个cct的这个变量如何翻到最后一页时值为0呢?
[此贴子已经被作者于2021/12/15 17:16:54编辑过]

--  作者:有点蓝
--  发布时间:2021/12/15 17:30:00
--  
这个要自己跟踪调试呀,把生成的sql拿去数据库执行,分析执行结果

我又调试不了,无法知道为什么不为0。