Copia dados da tabela movimento p/ a histórico
olá,
Preciso cópiar dados de uma table chamada movimento p/ outra chamada histórico, o código que estou usando só cópia uma linha do banco movimento mas preciso copiar todas as linhas do banco. uso paradox e delphi 5
agradeço!
Preciso cópiar dados de uma table chamada movimento p/ outra chamada histórico, o código que estou usando só cópia uma linha do banco movimento mas preciso copiar todas as linhas do banco. uso paradox e delphi 5
agradeço!
Castilho
Curtidas 0
Respostas
Marcelo.c
03/04/2003
table1.first;
while not table1.eof do
begin
table2.insert;
for i := 0 to table1.fieldcount-1 do
table2.field[i].value := table1.field[i].value;
table2.post;
table1.next;
end;
while not table1.eof do
begin
table2.insert;
for i := 0 to table1.fieldcount-1 do
table2.field[i].value := table1.field[i].value;
table2.post;
table1.next;
end;
GOSTEI 0
Castilho
03/04/2003
table1.first;
while not table1.eof do
begin
table2.insert;
for i := 0 to table1.fieldcount-1 do
table2.field[i].value := table1.field[i].value;
table2.post;
table1.next;
end;
não estou conseguindo compilar esse código, o erro aponta para a palavra field.GOSTEI 0
Okama
03/04/2003
[quote:2befc397fc=´marcelo.c´]table1.first;
while not table1.eof do
begin
table2.insert;
for i := 0 to table1.fieldcount-1 do
[b:2befc397fc]table2.field[i].value := table1.field[i].value; [/b:2befc397fc]
table2.post;
table1.next;
end;
não estou conseguindo compilar esse código, o erro aponta para a palavra field.[/quote:2befc397fc]use FIELDS ao invés de FIELD
GOSTEI 0
Aroldo Zanela
03/04/2003
olá,
Preciso cópiar dados de uma table chamada movimento p/ outra chamada histórico, o código que estou usando só cópia uma linha do banco movimento mas preciso copiar todas as linhas do banco. uso paradox e delphi 5
agradeço!
Uma única linha de instrução:
Table2.BatchMove(Table1,batAppend);
Onde:
Table2 -> Tabela de destino (histórico)
Table1 -> Tabela de origem (movimento)
GOSTEI 0
Adilsond
03/04/2003
Crie uma query com um insert buscando os dados diretamente via select:
INSERT INTO ´Customer.db´ (CustNo, Company)
SELECT CustNo, Company FROM ´OldCustomer.db´
INSERT INTO ´Customer.db´ (CustNo, Company)
SELECT CustNo, Company FROM ´OldCustomer.db´
GOSTEI 0