- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 窗口表筛选 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194765)
-- 发布时间：2025/1/12 9:22:00
-- 窗口表筛选
1、窗口表绑定的是normal型订单表正本，订单表中有个“是否完成”逻辑列，如何把订单表整表中未完成的行筛选出来并显示在窗口表，目前是用
table(“订单表”).filter="是否完成=false"只能筛选出当前页面的数据，窗口表是分面加载的
2、根据交叉统计表中的垂直分组（如：日期）形成筛选树，怎么弄
[此贴子已经被作者于2025/1/12 18:53:54编辑过]
-- 发布时间：2025/1/12 20:26:00
--
1、改为加载
datatable(“订单表”).loadfilter="是否完成=false"
datatable(“订单表”).loadtop = nothingdatatable(“订单表”).load
-- 发布时间：2025/1/12 20:46:00
--
麻烦大师看一下代码错在哪
-- 发布时间：2025/1/12 20:54:00
--
1、改为加载
datatable(“订单表”).loadfilter="是否完成=false"
datatable(“订单表”).loadtop = nothing
datatable(“订单表”).load
这段代码写在哪里
[此贴子已经被作者于2025/1/12 21:02:14编辑过]
-- 发布时间：2025/1/12 20:57:00
--
替换1楼的table(“订单表”).filter="是否完成=false"
-- 发布时间：2025/1/12 21:03:00
--
列是无法做筛选的，3楼这种只能是把条件合并到sql里，然后按日期重新统计一次
节点代码：
Dim Filter As String = ""
If e.node.Name <> "显示所有行" Then \'要用Name属性,不能用Text属性
Dim d1 As Date
Dim d2 As Date
Dim Year As Integer = e.Node.DataRow("年")
Dim Month As Integer = e.Node.DataRow("月")
Select Case e.Node.Level
Case 0
d1 = New Date(Year, 1, 1) \'取得该年的第一天
d2 = New Date(Year, 12, 31) \'取得该年的最后一天
Filter = "日期 >= #" & d1 & "# And 日期 <= #" & d2 & "#"
Case 1
d1 = New Date(Year, Month, 1) \'取得该月的第一天
d2 = New Date(Year, Month, Date.DaysInMonth(Year, Month)) \'取得该月的最后一天
Filter = "日期 >= #" & d1 & "# And 日期 <= #" & d2 & "#"
End Select
End If
Dim sql As String = "select * from (select 入库日期 As 日期,类别,库存编码,产品名称,规格,单位,商标,备注,入库数量,0 as 出库数量 from 入库明细 union select 出库日期 As 日期,类别,库存编码,产品名称,规格,单位,商标,备注,0 as 入库数量,出库数量 from 出库明细 ) as a where " & Filter
Dim bd1 As New CrossTableBuilder("统计表1", sql, "Sale")
Dim dt1 As fxDataSource
bd1.HGroups.AddDef("类别")
bd1.HGroups.AddDef("库存编码")
……后面补齐所有统计的代码按指定的日期重新统计
-- 发布时间：2025/1/12 21:06:00
--
谢谢大师，我试试
-- 发布时间：2025/1/12 21:42:00
--
麻烦老师再帮我看下4楼的问题
-- 发布时间：2025/1/12 21:44:00
--
很简单的问题，你的手误导致我照抄的代码出错
datatables(“订单表”)
-- 发布时间：2025/1/12 21:46:00
--
不好意思，谢谢老师，这么晚还支持