Eliminar registros duplicados...

[buxforever]

Hola a todos
La problematica esta asi...
Tengo una base externa la cual se importa a otra base mediante una instruccion SQL ("Insert to")mi problema es que no se como indicarle a VB6 mediante una instruccion que si (X) registro ya se encuentra en base de datos se omita y continue con el siguiente registro a importar...
Nota:
La instruccion SQL realiza toda la importacion de tabla a tabla..
Mi base de datos es en Access
O bien otra idea que tengo es que al final de que haya importado la base realize una especie de busqueda de registros duplicados y despues proceda a eliminarlos...mediante SQL...

Requiero de su ayuda ya apenas me voy induciendo en el mundo de SQL

Saludos

[lokoman]

Hola!
Intenta asi:

NOTA: ASUMO QUE TIENES UN CAMPO LLAMADO "DOCUMENTO"

Despues de insertar todos los registros, haz un recordset con la instruccion: "SELECT DISTINCT DOCUMENTO FROM TABLA"

Do while not recordset1.eof

Despues, otro recordset con esta instruccion: "SELECT * FROM TABLA WHERE DOCUMENTO=" & Recordset1!DOCUMENTO

Luego preguntas:
Do while not recordset2.eof
Cont=Cont+1
Loop

IF cont>1 THEN

Recordset2.movefirst

aqui debes guardar todos los campos en variables temporales, luego los borras, luego insertas los que guardaste en las vaiables temporales, asi:

VAR1=Recordset2!campo1
VAR2=Recordset2!campo2
VAR3=Recordset2!documento
VAR4=Recordset2!campo4

conexion.execute "delete from tabla where documento=" & recordset2!documento
conexion.execute "insert into tabla (campo1,campo2,documento,campo4) values (VAR1,VAR2,VAR3,VAR4)

Cont=0
ELSE
Recordset1.movenext
If Recordset2.state=1 then recordset2.close
END IF
Loop

Verifia si la logica te funciona.

[buxforever]

No me funciono me sigue duplicando registros...