主题：[求助]做导入时如何不重复导入

我问一下，相同产品，是根据什么来判断，型号规格相同，就是相同产品？ 还是根据物料编号？

例如根据物料编号判断，您可以在命令窗口执行：

For Each dr1 As DataRow In DataTables("报价单明细").DataRows
    Dim dr2 As DataRow
    dr2 = DataTables("报价汇总表").find("客户代号 = '" & dr1("客户代号") & "' And 物料编号 = '" & dr1("物料编号")  & "'")
    If dr2 IsNot Nothing  Then
        If MessageBox.Show(dr1("客户代号") & "已经有" & dr1("物料编号") & "的报价,是否覆盖?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.No Then
            Continue For
        End If
    Else
        dr2 = DataTables("报价汇总表").AddNew()
    End If
    For Each dc As DataCol In DataTables("报价单明细").DataCols
        If DataTables("报价汇总表").DataCols.Contains(dc.name) Then
            dr2(dc.name) = dr1(dc.name)
        End If
    Next
Next