Query de uma Query
Pessoal,
Tenho um componente AdoQuery1 que seleciona dados de um deterinado banco. Eu preciso fazer um insert em outro banco com os dados selecionados pelo AdoQuery1, seria + ou - assim:
ADOQuery2.Sql.Add(´Insert Into tb_dados Select * from ADOQuery1´)
Alguém poderia me ajudar?
obrigado
Tenho um componente AdoQuery1 que seleciona dados de um deterinado banco. Eu preciso fazer um insert em outro banco com os dados selecionados pelo AdoQuery1, seria + ou - assim:
ADOQuery2.Sql.Add(´Insert Into tb_dados Select * from ADOQuery1´)
Alguém poderia me ajudar?
obrigado
Mrsilva.rodrigo
Curtidas 0
Respostas
Turbo Drive
09/01/2004
Não sei se esta solução é a mais elegante, mas que funciona, funciona. :D
select * from adoquery1;
adoquery1.first;
while not adoquery1.eof do
begin
ADOQuery2.Sql.Add(´Insert Into tb_dados (campo1,..., campoN) values (adoquery1.fields[0].value,..., adoquery1.fields[N].value)´);
ADOQuery2.Execsql;
end;
select * from adoquery1;
adoquery1.first;
while not adoquery1.eof do
begin
ADOQuery2.Sql.Add(´Insert Into tb_dados (campo1,..., campoN) values (adoquery1.fields[0].value,..., adoquery1.fields[N].value)´);
ADOQuery2.Execsql;
end;
GOSTEI 0