以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  多文件列去重复问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=102935)

--  作者:HJG_HB950207
--  发布时间:2017/6/27 23:12:00
--  多文件列去重复问题
如下代码 操作多次会出现重复值,如何调整如下代码,使得按姓名导入照片时,不会将同一照片重复导入。

  Dim fdr As DataRow = DataTables("表A").Find("  姓名  = \'" & name & "\'")
    If fdr IsNot Nothing Then
        fdr("照片") &= iif(fdr("照片")=Nothing, "", vbcrlf) & ifo.name
    End If


谢谢!

--  作者:有点蓝
--  发布时间:2017/6/27 23:23:00
--  
Dim fdr As DataRow = DataTables("表A").Find("  姓名  = \'" & name & "\' and 照片 not like \'%" & ifo.name & "%\'")