[求助]ExcludeExistValue失效（已解决） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]ExcludeExistValue失效（已解决）

共有1544人关注过本帖树形打印复制链接主题：[求助]ExcludeExistValue失效（已解决）

yyzlxc

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1525 积分：10580 威望：0 精华：0 注册：2008/9/24 11:16:00

[求助]ExcludeExistValue失效（已解决） 发帖心情

Post By：2016/3/31 10:18:00 [显示全部帖子]

在SQL2008r2外部数据源的项目中，在命令窗口运行下面这段代码，f.ExcludeExistValue = True 失效，而做一个案例时（都是内部数据源），ExcludeExistValue 却是有效的，如何解决，请各位老师指教，谢谢！

Dim rq As Date = Forms("扎包数据2").Controls("DateTimePicker1").Value

Dim f As New Filler

f.SourceTable = DataTables("扎包数据") '来源表外部据源

f.DataTable = DataTables("扎包数据2") '接收表内部数据源

f.Filter = "日期 = '" & rq & "' and 人员ID = 10 and 扎包ID = 12"

f.ExcludeExistValue = True ’排除接收表中已经存在的内容

f.Fill()

DataTables("扎包数据2").Save()

Tables("扎包数据2").AutoSizeCols()

[此贴子已经被作者于2016/3/31 17:04:03编辑过]

yyzlxc

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1525 积分：10580 威望：0 精华：0 注册：2008/9/24 11:16:00

Post By：2016/3/31 15:50:00 [显示全部帖子]

谢谢大红袍老师的指教，选择第一个方案，问题解决了。再次感谢！！

yyzlxc

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1525 积分：10580 威望：0 精华：0 注册：2008/9/24 11:16:00

Post By：2016/3/31 15:56:00 [显示全部帖子]

原来的项目中还有很多 Filler的应用，是否也会失效？ExcludeExistValue失效的原因是什么？如何解决？还是全部要更换掉？还请老师指教，谢谢！！

[此贴子已经被作者于2016/3/31 15:59:22编辑过]

yyzlxc

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1525 积分：10580 威望：0 精华：0 注册：2008/9/24 11:16:00

Post By：2016/3/31 17:04:00 [显示全部帖子]

知道了，谢谢大红袍老师！！

主题：[求助]ExcludeExistValue失效（已解决）