主题：[求助]请教一个filter填充的问题！

项目如下：
项目的目的就是一旦售后客户档案有最新的进店信息，里程数和最后进店时间  有更改  然后点窗口1中的保存后 会把这个最新信息填充进历史进店记录里

但是现在发现一个问题   就是只要一点保存 就会把 售后客户档案里的 所有 底盘号  里程数 和最后进店时间 全部填充进历史进店记录里了  很奇怪

保存按钮的代码如下：
Dim g As New Filler
g.SourceTable = DataTables("售后客户档案") '指定数据来源
g.SourceCols = "底盘号,里程,最后进店日期" '指定数据来源列
g.DataTable = DataTables("历史进店记录")'指定数据接收表
g.DataCols = "底盘号,里程,最后进店日期" '指定数据接收列
g.ExcludeExistValue =True
g.ExcludeNullValue =False
g.Distinct =True
g.Append =True
g.Fill()

PS.双击售后客户档案表  就可以打开 窗口1

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

点击浏览该文件:管理项目1.rar

此主题相关图片如下：无标题.png

 

打开窗口1  直接点保存后~~~  就直接填充了 3000多数据