Duas Table para TXT e TXT para duas Table _exportar e import

Question

Colegas.Tenho duas tabelas e preciso exportar para o mesmo arquivo  txt e depois importar para o banco, PDox  a 1 tabela ela contem apenas um registro, com varios campos, com uma chave primaria ex_Cod...

Paulo · Answer

N�o entendi muito, mas para exportar para txt eu fa�o assim:

var
a:textfile;
begin
//cria o arquivo txt no diret�rio do execut�vel. Pode ser outro.
AssingFile(a, ExtractFilePath(Application.Exename)+�arquivo.txt�);
Rewrite(a);
tabela.first;
while not tabela.eof do begin
writeln(a, tabela.fieldbyname(�campo1�).asstring;);
writeln(a, tabela.fieldbyname(�campo2�).asstring;);
writeln(a, tabela.fieldbyname(�campo3�).asstring;);
tabela.next;
end;
end;

Zotti · Answer

ex onibus primeira tabela
passageiros segunda tabela, bem os passageiros, fazem parte da
primeira table, ou seja precisam e pertencem e se relaciona ao codigo onibus, quest�o. um codigo registro para o onibus e varios para a segunda
tabela, como o exemplo onibus, eu preciso trazer todos esses detalhes
para o BD, e esses dados est�o em txt, meu problema n�o � trazer apenas um registro, mas sim varios, para tables diferente.
Como fazer isso... :?: :?:

Zotti · Answer

:?:...

F�rum Duas Table para TXT e TXT para duas Table _exportar e import #260540