Fórum Como importar registros de várias tabelas DBF p/ o Interbase #58812
06/09/2007
0
Como posso importar os registros de várias tabelas DBF para as tabelas com a mesma estrutura no Interbase(.GDB) utilizando o delphi 7.Por exemplo, preciso importar os registros de 5 tabelas DBF que estão em disquete 3 1/2 para as tabelas de um banco de dados interbase, de um programa em delphi 7.Quando o usuário clicar no botão importar , ele deverá procurar o caminho, selecionar as tabelas e importa-las.COmo posso fazer isso, alguém tem um exemplo para me enviar?Podem me ajudar?
Agradeço a ajuda.
Thaita
Curtir tópico
+ 0Posts
06/09/2007
Rinez
Faça o seguinte:
1) Pegue a primeira tabela DBF e ative ela com os dados.
2) Crie um Banco de dados FDB e crie a tabela com as estruturas
da iguais as da tabela DBF.
3) Usando a paleta DBEXRESS coloque um sqlconnection1 e uma query1.
4) Faça a conecção do sqlconnection1 com seu banco.
5) O proprio sqlconnecton1 pode criar suas tabelas.
6) ligue a query1 com sqlconnection - Object Inspetor sqlconnection.
7) Coloque em um botão:
suatabelaDBF. open;
sua tabelaDBF.first;
for i:=1 to suatabelaDBF.recordcount do
with query1 do begin
close;
sql.clear;
sql.add(insert into suatabelaInterbase (id,nome,... ) values(´)
sql.add(:id,:nome, ...)´);
parambynme(´id´).asinteger:=SuatabelaDBF.fieldbyname(´tal´).asinteger;
parambynme(´nome´).asstring:=SuatabelaDBF.fieldbyname
´talnome´).asstring;
. . . . . .. .
. . . . ... . .
execsql;
end; // with
end; // for
todos os dados da primeira tabelaDBF estarão na SuaTabelaInterbase.
Faça o mesmo para outras tabelas.
Qualquer duvida estamos aqui para ajudar.
Gostei + 0
06/09/2007
Gandalf.nho
Gostei + 0
06/09/2007
Martins
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)