以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]临时表删除行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184530)

--  作者:lgj716330
--  发布时间:2022/12/12 19:06:00
--  [求助]临时表删除行

Dim dtb As New DataTableBuilder("核算调整")

dtb.AddDef("年份", GetType(String), 32)

dtb.AddDef("月份", GetType(Integer))

dtb.AddDef("仓店编号", GetType(String), 32)

dtb.AddDef("仓店名称", GetType(String), 100)

dtb.AddDef("填充标记", GetType(String), 100)

dtb.AddDef("数量", GetType(Double))

dtb.Build()


创建上述临时表后,从其他表填充数据进来,然后按下面进行选择删除,想只保留填充标记是“未填充”的记录

Tables("核算调整").Filter = ("填充标记 = \'已填充\' or 填充标记=\'未完成\'")

CurrentTable.DataTable.DeleteFor(CurrentTable.Filter)


然后再填充到外部表中,结果发现已填充,未完成,未填充的所有记录都填充进来了,要怎么调整


Dim f55 As New Filler
F55.SourceTable = DataTables("核算调整")
F55.SourceCols = "仓店编号,仓店名称,年份,月份,数量,填充标记
F55.DataTable = DataTables("核算表")
F55.DataCols = "仓店编号,仓店名称,年份,月份,数量,填充标记"
F55.Filter =“填充标记=\'未填充\'”

F55.Fill()

填充时直接筛选也是不行
[此贴子已经被作者于2022/12/12 19:24:02编辑过]

--  作者:有点蓝
--  发布时间:2022/12/12 20:09:00
--  
我测试没有问题,请上传实例说明
--  作者:lgj716330
--  发布时间:2022/12/13 9:28:00
--  
把下面填充的代码删除,重新写一遍又可以了