主题：运用Filler时发现的问题

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:filler示例.foxdb

上午用Filler做数据填充拷贝，发现存在这个问题

说明：例子中jjclmx1是我所用的数据源，jjclmx2是反复几次中补填了出库单号的数据源，初步的结论是：在有一列是空的前提之下，Filler是不完全的

具体详见窗口说明，和观察两个按钮后产生的数据对比。

没有开发版，贴出filter的代码看看吧。。。

为空补上调价：

某列  <> '123’  or 某列 Is NULL

看来老六有时候也马虎了，mr25也马虎了

一个字母的差异，一楼所提到的问题不是filter，而是数据填充器filler，请老六下载我上传的例子瞧一下，应该是存在着问题，呵呵

代码很简单的，情况也说明得比较清楚

呵呵， 收到

正确的代码应该是:

DataTables("clmx").DataRows.Clear
Dim f As New Filler
f.SourceTable = DataTables("jjclmx1") '指定数据来源
f.DataTable = DataTables("clmx") '指定数据接收表
f.Distinct = False
f.fill
e.Form.Controls("TextBox1").value = DataTables("jjclmx1").Compute("sum(出库金额)")
e.Form.Controls("TextBox2").value = DataTables("clmx").Compute("sum(出库金额)")

明白，还是自己不小心，呵呵

不过还是建议这个Distinct属性能默认不排除重复！

我做这么多个项目，还是不排除重复的，基本上都是拷贝明细的数据。

如果要得到不重复的地方，还基本上是提取某列的不重复值，又不需要用这个Filler，有的是其他办法。

还是这样建议Distinct属性能默认不排除重复。

这样改动是否可行，请老六斟酌！呵呵

filler问世已久，不能改的，改了的话，很多人的系统会出问题的。