ADO y Access

[Blackspike]

Podrias poner el codigo con el que realizas el recorrido de los datos?

[[enecumene]]

Empezado por Blackspike

Podrias poner el codigo con el que realizas el recorrido de los datos?

Vale Hombre estoy de acuerdo con BlackSpike postea el codigo que utilizas para hacer el recorrido, estoy seguro que no tiene nada que ver con ADO o con la base de Datos.

Saludos.

[dvlt]

Ok, pero el codigo no tiene nada del otro mundo...

 
while not ADODataset1.Eof do
begin
  Query1.SQL.Clear;
  Query1.SQL.Add('INSERT INTO tabla_dest (campo1,campo2,campo3) VALUES (campo1ori,campo2ori,campo3ori));
  Query1.ExecSQL;
  Query1.Close;
 
  ADODataset1.Next;
end;

es lo habitual, si es que por codigo no puede ser, porque me recorre el ADODataSet bien, lo unico que es como si no hiciera bien el ADODataSet1.Next; por eso que no sea el controlador ...

Gracias!

[[enecumene]]

Empezado por dvlt

Ok, pero el codigo no tiene nada del otro mundo...

 
while not ADODataset1.Eof do
begin
  Query1.SQL.Clear;
  Query1.SQL.Add('INSERT INTO tabla_dest (campo1,campo2,campo3) VALUES (campo1ori,campo2ori,campo3ori));
  Query1.ExecSQL;
  Query1.Close;
 
  ADODataset1.Next;
end;

es lo habitual, si es que por codigo no puede ser, porque me recorre el ADODataSet bien, lo unico que es como si no hiciera bien el ADODataSet1.Next; por eso que no sea el controlador ...

Gracias!

Bueno, te dire lo siguiente, estas haciendo una insercion, pero no se desde donde sacas los valores, pero estas insertando y haciendo un Next, cosa que no deberia, porque segun la logica del codigo es la causa de que te duplique y triplifique, para mi ese es el problema. Porque cuando hablabas de un recorrido se entiende que es una consulta de datos y no una insercion de datos. Quizas explicando un poco mas de lo que estas intentando hacer con ese codigo talvez te podamos dar otra solucion mejor.

Saludos.

[[Caral]]

Hola
Tienes un AdoConnection que enlaza la base de datos, tienes un ADODataset que no esta haciendo nada mas que leer el codigo que le das del query.
Yo quitaria el ADODataset y pondria un AdoQuery, quedaria asi:

Código Delphi [-]
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('INSERT INTO tabla_dest (campo1,campo2,campo3) VALUES (campo1ori,campo2ori,campo3ori));
ADOQuery1.ExecSQL;

Es una inserción normal, no tiene por que hacerse mas grande de la cuenta, ademas se usa el exec, para que cerrar ademas el query.
Otra cosa no me gusta el ADD, tienes que hacer un clear anterior, prefiero TEXT, con esto me ahorro lineas de lectura, por tanto rapidez en el programa.
Bueno, es mi opinion.
Saludos