Eliminar duplicados con LECT DISTINCT
 

Hola a todos.
Tengo el siguiente problema.
Tengo una tabla access "paso" , la cual tiene un campo, 'Code' que tiene registros duplicados. Tiene tres campos mas.
Para eliminar los registrso duplicados segun el campo 'Code' creo otra tabla con la expresion:

Código SQL [-]
 ADOCommand1.CommandText := 'INSET INTO paso1  SELECT DISTINCT Code  FROM paso;
ADOCommand1.Execute;

Al ejecutar el comando, se crea una tabla sin los repetidos.
Pero no se copian los valores de los otors campos de los registros.

Si pongo la expresion

Código SQL [-]
 ADOCommand1.CommandText := 'INSET INTO paso1  SELECT DISTINCT Code,campo2,campo3,campo4  FROM paso;
ADOCommand1.Execute;

Evalua los 4 campos, con lo cual no se eliminan los repetidos que aparacen en el campo 'code'

Podriais hecharme una mano?
Gracias.
Un Cordial saludo

Tal vez esta página te pueda dar una idea de lo que necesitas.