|
Usuários |
|
104 Usuários Online
|
|
[Dicas]
Copiar dados de uma tabela para outra utilizando DataSets |
Publicado por karlosrapanui : Quinta, Outubro 23, 2008 - 10:59 GMT-3 (1935 leituras)
 1 Comentário  Enviar para um amigo  Versão para impressão
|
Veja nesta dica como é simples copiar dados de uma tabela para outra utilizando DataSets, quando estas possuem a mesma estrutura.
Faça a ligação de cada DataSet ao seu respectivo DataBase. No botão que chamará
o transporte, faça:
var
c: integer;
begin
while not tabATIVA.EOF do
begin
tabTEMP.Append;
for c :=0 to tabTEMP.FieldCount-1 do
tabTEMP.Fields[c].Value := tabATIVA.Fields[c].Value;
tabTEMP.Post;
tabATIVA.Next;
end;
end;
Espero que seja útil.
[]'s
Por: Carlos (karlosrapanui)
Contato: karlosrapanui@hotmail.com
|
|
 Comentários | |
| | Comentários pertencem aos seus respectivos autores. Não somos responsáveis pelo seus conteúdos. |
por: silviorob (silvio-rob@bol.com.br)
: Ago 12, 2009 - 11:07
(Informações sobre o membro | Enviar uma mensagem)
|
Apesar deste artigo ser antigo, vou deixar uma outra forma de inserir dados de uma tabela para outra. Neste caso me refiro ao MySQL, mas deve funcionar para outros bancos também:
INSERT INTO TABELA2 (ID, NOME, EMAIL, FONE)
(SELECT ID, NOME, EMAIL, FONE FROM TABELA1);
ou
INSERT INTO TABELA2 (ID, NOME, EMAIL, FONE)
(SELECT ID, NOME, EMAIL, FONE FROM TABELA1 where
ID > 1);
Apenas um exemplo. É só testar e ver o resultado.
Lembrando que os campos devem ser de tipos iguais ou equivalentes, e tenha cuidado com campos auto increment, se for o caso.
|
|
|
Edição 112 |
|
|
50 Programas Fontes |
|
|
Produtos |
|
|
