以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助:采用filler进行数据填充时,如何先行判断当前数据是否存在同一个部门受案号,如果有,则表中公诉表中的数据只是更新到案件基本信息表中,如果不存在,那么就全部更新到案件基本信息表中。  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=131019)

--  作者:李孝春
--  发布时间:2019/2/14 14:21:00
--  求助:采用filler进行数据填充时,如何先行判断当前数据是否存在同一个部门受案号,如果有,则表中公诉表中的数据只是更新到案件基本信息表中,如果不存在,那么就全部更新到案件基本信息表中。
采用filler进行数据填充时,如何先行判断当前数据是否存在同一个部门受案号,如果有,则表中公诉表中的数据只是更新到案件基本信息表中,如果不存在,那么就全部更新到案件基本信息表中。


Dim f As New Filler
f.SourceTable = DataTables("公诉表") \'指定数据来源
f.SourceCols = "部门受案号" \'指定数据来源列
f.DataTable = DataTables("案件基本信息") \'指定数据接收表
f.DataCols = "部门受案号" \'指定数据接收列
f.Fill() \'填充数据
红色部分代码怎么扩展完善呢?



--  作者:有点甜
--  发布时间:2019/2/14 14:53:00
--  

Dim f As New Filler
f.SourceTable = DataTables("公诉表") \'指定数据来源
f.SourceCols = "部门受案号" \'指定数据来源列
f.DataTable = DataTables("案件基本信息") \'指定数据接收表
f.DataCols = "部门受案号" \'指定数据接收列
f.ExcludeExistValue = True
f.Append = False
f.Fill() \'填充数据