主题：合并外部数据

帮助文件提到

 

自行编码合并外部数据

 

我们知道，用Merger可以合并外部数据到表中，不过Merger没有排除重复内容的选项，有时不能满足我们的要求。

例如项目中有一个员工表，要从一个外部文件中合并数据到这个员工表中，希望在合并过程中检查身份证号码，如果员工表已经存在相同身份证号码的行，则跳过此行。
假定被合并的表和员工表的结构相同，代码如下：

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.ConnectionName = "数据源名称"
cmd.CommandText = "SELECT * From {员工}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.DataRows
If DataTables("员工").Find("身份证号码 = '" & dr("身份证号码") & "'") Is Nothing Then
Dim nr As DataRow = DataTables("员工").AddNew()
For Each dc As DataCol In dt.DataCols
nr(dc.name) = dr(dc.name)
Next
End If
Next

 

 

我想把它改为多列判断是否存在相同的行，不知如何解决，求助

 

谢谢！

在find中增加判断条件

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT * From {员工}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.DataRows
    If DataTables("员工").Find("身份证号码 = '" & dr("身份证号码") & "' And 另一列 = '" & dr("另一列") & "'") Is Nothing Then
        Dim nr As DataRow = DataTables("员工").AddNew()
        For Each dc As DataCol In dt.DataCols
            nr(dc.name) = dr(dc.name)
        Next
    End If
Next

 

建议看看：

 http://www.foxtable.com/help/topics/1284.htm

 

非常感谢！

我有两张表（sfzxxcj和jmsfzxx)，均是外部数据表，我用上述代码将 sfzxxcj的记录合并到 jmsfzxx，要求排除身份证（GB011)重复，在表jmsfzxx加载所有数据时，可以达到不合并已有数据的目的，但如果表jmsfzxx不加载数据时，不能实现目的。我的代码如下：

 

用sqlfind 代替 find 方法

 

http://www.foxtable.com/help/topics/2911.htm

 

 不过，既然是两表不重复内容的合并，建议先用sql语句查询出数据，然后把数据插入就行了。

 

 连接查询，sql语句，得到的jmsfzxx没有的行，如：

 

 select a.*, b.GB011 from {sfzxxcj} as a left join {jmsfzxx} as b on a.GB011 = b.GB011 where b.GB011 is null

谢谢您的指点，但是我很菜，不会写，能否帮忙写一下？再次感谢！

 

如果不会写，就用7楼的方法，就行了。也可以用。

 

 或者