请教：VB中导入EXCEL到后台SQLserver时如何避免其数据与后台的记录重复？

Question

Dim con As Object
Set con = CreateObject("ADODB.Connection")
con.Open _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=" + Fname + ";" & _
    "Extended Properties='Excel 8.0;HDR=YES;IMEX=1'"
    con.Execute _
    "INSERT INTO [ODBC;Driver={SQL Server};" & _
    "SERVER=SqlServer;DATABASE=Hr_Osp;" & _
    "UID=sa;Pwd=123456;].QlDbf(合同号,订单号)" & _
    " SELECT 合同号,订单号 FROM [Sheet1$];"这样做可以实现批量导入EXCEL的数据到后台的数据库，但如果后台的SQL数据库里面的数据存在与EXCEL里的数据重复的话就没有办法处理了（由于程序特殊，因此后台的SQL数据库不能设定唯一索引，我希望以SQL里的数据为准，即不导入EXCEL里的重复数据），请您指教，谢谢

Answer 1

加个Where子句嘛Where [不重复字段] Not In (Select [不重复字段] From [Sheet1$])差不多就是这样子