从Excel表中导入数据时,如何实现只导入目标表中不存在的数据(根据某一关键列判断是否存在)
如:导入按钮代码如下
Dim dlg As New OpenFileDialog
dlg.Filter= "Excel文件|*.xls"
If dlg.ShowDialog = DialogResult.Ok Then
If MessageBox.Show("你选择的是:" & dlg.FileName,"提示",MessageBoxButtons.OKCancel) = DialogResult.OK Then
Dim mg As New Merger
mg.SourcePath = dlg.filename
mg.Format = "excel"
mg.SourceTableName = "销售表$"
mg.DataTableName = "明细表"
mg.Merge()
End If
End If
结果会将“销售表”中是所有数据导入到“明细表”中,假设表中有“fa piao号”列,怎么实现根据该列判断“明细表”中是否存在重复数据,并实现只导入不重复的数据。