Duas Table para TXT e TXT para duas Table _exportar e import
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, a segunda tabela contem varios registro com chave secundaria ex_Cod, ambas estão relacionadas.
Como fazer :?: :?: :?:
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, a segunda tabela contem varios registro com chave secundaria ex_Cod, ambas estão relacionadas.
Como fazer :?: :?: :?:
Zotti
Curtidas 0
Respostas
Paulo
30/11/2004
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;
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;
GOSTEI 0
Zotti
30/11/2004
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... :?: :?:
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... :?: :?:
GOSTEI 0
Zotti
30/11/2004
:?:
GOSTEI 0