Exportar ddados

Question

Tenhu 2 tabelas com a mesma estrutura e preciso exportar alguns registros de uma para outra em runtime... Qual a meneira mais simples de fazer issu????...

Minuto · Answer

eu fa�o assim
uma query1 com a tabela de origem
select * from tabela1
where cod in (select cod from tabela2)

coloco uma grid para visualizar os campos

uma query2 com a tabela de destino

insert into tabela2 (cod,nome,endereco)
values (:cod,:nome,:endereco)

e um button ou mesmo dbleclik do grid

query2.parambyname(�cod�).asinteger:=query1.fields[0].value;
query2.parambyname(�nome�).asinteger:=query1.fields[1].value;
query2.parambyname(�endereco�).asinteger:=query1.fields[2].value;

query2.execsql;
query1.close;
query1.open;

Minuto · Answer

ahhhhhh!runtime!amigo ! vc disse alguns registros . como pretende selecionar esses registros?...

Breguede · Answer

Atraves de um dbedit mesmo......

Minuto · Answer

insert into tabela2 (cod,nome,endereco)
values (:cod,:nome,:endereco)

e um button ou mesmo dbleclik do grid

query2.parambyname(�cod�).asinteger:= strtoint(edit1.text);
query2.parambyname(�nome�).asinteger:=query1.fields[1].value;
query2.parambyname(�endereco�).asinteger:=query1.fields[2].value;

query2.execsql;

Obs: a primeira forma que fiz � a melhor pois vc visualiza somente os dados da tabela 1 q vc ainda n�o enviou.

Breguede · Answer

VALEW!!!!...