以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  合并时排查重复的  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140613)

--  作者:gudao123456
--  发布时间:2019/9/10 0:03:00
--  合并时排查重复的
在利用 fillter合并 表时,如何对已有数据不合并,或把相同数据覆盖掉? f.distinct=True 有用吗?谢谢!
--  作者:有点蓝
--  发布时间:2019/9/10 8:49:00
--  
使用这种方式合并:http://www.foxtable.com/webhelp/topics/1533.htm

For Each dr1 As DataRow In DataTables("表A").Select("[金额] > 100")
    Dim dr2 As DataRow = DataTables("表B").find("编号=\'" & dr1("编号") & "\'")
    If dr2 Is Nothing Then
        dr2 = DataTables("表B").AddNew()
    End If
    For Each dc As DataCol In DataTables("表A").DataCols
        dr2(dc.Name) = dr1(dc.name)
    Next
Next

--  作者:gudao123456
--  发布时间:2019/9/10 9:08:00
--  
谢谢!