Discussion :

[jean christophe]

Bonjour,

J'essaie d'utiliser le composant TADOCommand pour insérer un champ dans une table dont je connais la clef.
Je le fais de la facon suivante:

Code :

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

1
2
3
4
5
6
 
Temp:= 'UPDATE ' + CmbBx_Katalog.Text + ' SET BilledetNogle= "' + dt_Katalog_Billeder.Text +
'" WHERE Nogle="' + dt_Nogle.Text + '" ;';
ADOCommand1.prepared := False;
ADOCommand1.commandText := Temp;
ADOCommand1.prepared := True;

Est ce la bonne facon de s'en servir?
J'ai cherché sur le net, mais je n'ai pas trouvé d'exemples!

Merci
Sicérement
Jean-Christophe

[Rayek]

Je te conseillerai plus l'utilisation des paramètres lors de la construction de ta chaine

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
With AdoCommand1 do
begin
  Temp:= 'UPDATE ' + CmbBx_Katalog.Text + ' SET BilledetNogle= :PBille ' +
'WHERE Nogle= :PNogle';
  prepared := False;
  commandText := Temp;
  ParamCheck := True;
  With Parameters do
  begin
    ParamByName('PBille ').Value := dt_Katalog_Billeder.Text;
    ParamByName('PNogle').Value := dt_Nogle.Text;
  end;
  prepared := True;
  Execute; // Pour exécuter la requête
end;

[jean christophe]

Merci pour ta réponse Rayek, c'est vrai que c'est beaucoup mieux.

Je ne comprends pas vraiment ceci:

Code :

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

1
2
3
4
5
6
7
 
ParamCheck := True;
   With Parameters do
      begin
      ParamByName('PBille ').Value := dt_Katalog_Billeder.Text;
      ParamByName('PNogle').Value := dt_Nogle.Text;
      end;

Quand je lis ces lignes, je comprends que c'est un controle sur la table, mais c'est avant l'insertion n'est ce pas?
Est ce pour controler les types?

J'avais moi même oublié l' execute (mais trouvé un exemple sous delphi help "F1").
Encore une fois:

[Rayek]

Je ne comprends pas vraiment ceci:

Code :

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

1
2
3
4
5
6
7
 
ParamCheck := True;
   With Parameters do
      begin
      ParamByName('PBille ').Value := dt_Katalog_Billeder.Text;
      ParamByName('PNogle').Value := dt_Nogle.Text;
      end;

Quand je lis ces lignes, je comprends que c'est un controle sur la table, mais c'est avant l'insertion n'est ce pas?

En fait, les paramètres vont être automatiquement rempli dans ta requête et tu n'as pas besoin de t'occuper du format de ceux-ci
Le ParamCheck à True c'est surtout pour que le composant reconstruise sa liste de paramètres avec la nouvelle requête (c'est un réflexe pour ma part car j'ai tendance à réutiliser très souvent les mêmes composants)

[jean christophe]

Super!

Merci pour l'explication Rayek

Bonne journée et a+
Sincérement
Jean-Christophe