Discussion :

[passion_info]

salut,
-j'ai une application qui utilise une bdd concu avec interbase.
- je veux copier une table ( tabel1) qui se trouve dans bdd1 vers une autre bdd2 ( table2 a les meme champs que table1)
- j'utilise delphi version 6.
merci de votre aide.

[nsnow06]

bonjour
j'utilise delphi4 et je debute avec delphi2006 mais je pense que c'est pareil avec delphi6

il y à plusieur methodes

voir dans l'aide l'utilisation du composant TBatchMove
(désolé, je suis pas au boulo, je n'est pas delphi chez moi, je te dit ca de tete)

sinon tu peu utiliser une boucle while et copier champ par champ d'une base à l'autre
il faut posseder les droit d'ecriture sur la table2, personnelement j'ouvre la table en mode exclusif

ensuite

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
table2.active:=True;
with table1 do begin
  active:=true;
  first;
  while not eof do begin
    table2.insert;
    table2.fieldbynames('NomChamString').AsString:=fieldbynames('NomChamString').AsString;
    table2.fieldbynames('NomChamInteger').AsInteger:=fieldbynames('NomChamInteger').AsInteger;
    table2.fieldbynames('NomChamFloat').AsFloat:=fieldbynames('NomChamFloat').AsFloat;
    table2.post;
    next; 
  end;
end;

à la place de fieldbynames tu peu utiliser fieldvalues
ou tu peu copier tout les champ d'un coup voir setfields

j'espere que ceci te mettra sur la bonne piste.

[passion_info]

salut,
je vais essayé.
merci de la réponse.

[passion_info]

salut,
ça a marché merci.
merci beaucoup.