Discussion :

[aityahia]

salut a tous

j'ai une petit boucle qui doit impiorté des enregistrement d'une table a une autres
comme suit :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
While not AdoTable1.Eof do
 begin
   AdoTable2.Append;
   AdoTable2Champs1 :=  AdoTable1Champ1.Value
   AdoTable2Champs2 :=  AdoTable1Champ2.Value
   ..
   ...
   AdoTable2Champsn :=  AdoTable1Champn.Value
   AdoTable2.Post;
   AdoTable1.Next;
 end;

le problemme c'est que lorsque j'ai un champs null dans AdoTable1
il copie la valeur de l'enregistrement précédent
j'ai tous essayer.
j'ai remedier au problemme en utilisant la fonction fieldByName qui lit directement dans la base de données.

quelqu' un a t'il une autre solution a ce probleme.

[banban54]

bonjour

à essayer:

Code :

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

1
2
3
 
  if not AdoTable1Champ1.isnull then
    AdoTable2Champ1.Value := AdoTable1Champ1.Value;

à plus

[aityahia]

merci pour la réponse j'ai envisager cette solution mais sa reste toujour un bug pour TADOTable. je ne sai si il exist une mis a jour pour fixer ce bug

[Graffito]

bonjour,
et ainsi :

Code :

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

if AdoTable1Champn.Value<>nil then AdoTable2Champsn:=AdoTable1Champn.Value