[uper]

Saludos a todos los del foro,

estoy haciendo un procedimiento con un botoncito en delphi que me permita importar datos de la base de datos en interbase 6.0 y seran pasados a otra base de interbase 6, por lo cual hice que exportar a archivos en dbase.dbf, en *cvc pero ahora no se como.
en algunas busquedas encontre algo asi que fui acomodando para que funcionara pero no logro hacer la importacion.
Use un Ibquery y conectarlo a la base de datos de donde seran grabado finalmente.

procedure Tfrmpricipal.Button1Click(Sender: TObject);
var
Actual : Integer;
begin
moduloDB.IBaFORES.SQL.Clear;
moduloDB.IBaFORES.SQL.Add('iNSERT INTO Estados(ID, Estado) VALUES(:CAMPO1, :CAMPO2');
For Actual := 1 To 30 Do
Begin
with moduloDB.IBEstados.Insert DO ----->error
begin
Params.ByName('CAMPO1').value:=Excel.Cells[Actual,1].Value;
Params.ByName('CAMPO2').value:=Excel.Cells[Actual,2].Value;
Exec;
END;
end;

gracias