importar dados de uma tabela para outra

Delphi

06/06/2006

E ai pessoal blz....

Bom é o seguinte quero importa um os dados mais importante de uma tabela de outro sistema para o meu sistema os dois sistemas são em paradox e quero deixar uma opção um botão para q assim quando a pessoa for cadastrando no outro sistema ele possa carregar os cadastro para o meu

os dados q eu quero buscar na tabela do outro sistema são: nome do cliente, endereço e telefone

vlw


Tchucky

Tchucky

Curtidas 0

Respostas

Misael

Misael

06/06/2006

Exemplo simples... amigo
Table1.Open
Table2.First
while Table1.eof then
Begin
Table2.Insert

table1nomedocliente.asstring := table2nome.asstring;

...... etc

Table1.Next
Table2.Post

end;



GOSTEI 0
Martins

Martins

06/06/2006

Exemplo simples... amigo 
Table1.Open
Table2.First
while Table1.eof then
Begin
Table2.Insert

table1nomedocliente.asstring := table2nome.asstring;

...... etc

Table1.Next
Table2.Post

end;


Seria [b:a130f91424]while not Table1.eof then[/b:a130f91424] 

Table1.Open 
Table2.First 
while not Table1.eof then 
Begin 
Table2.Insert 

table1nomedocliente.asstring := table2nome.asstring; 

...... etc 

Table1.Next 
Table2.Post 

end;


O outro sistema já está pronto, fechado e não é seu? Pq se ele tb for seu, vc pode inserir uma procedure para fazer integração com esse segundo sistema, assim os dados q vc deseja obter ao serem salvos seriam replicados tb para sua segunda aplicação, ou então vc pode fazer a importação apartir do segundo mesmo.

boa sorte


GOSTEI 0
Martins

Martins

06/06/2006

Corrigindo...

[b:2cdf5af327]while not Table1.eof do[/b:2cdf5af327]

Table1.Open 
Table2.First 
while not Table1.eof do
Begin 
Table2.Insert 

table1nomedocliente.asstring := table2nome.asstring; 

...... etc 

Table1.Next 
Table2.Post 

end;



GOSTEI 0
Tchucky

Tchucky

06/06/2006

Um sistema é meu o outro é o SIC, meu sistema tem q pegar os dados da tela clentes dele e jogar para a tabela do meu sistema...


GOSTEI 0
POSTAR