Discussion :

[exyacc]

bonjour, j'ai une question sur les requêtes paramétrées:

quand je fais ça, ça marche

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
17
18
19
20
 
procedure del;
begin
  with Tadoquery.Create(nil) do
  begin
    ConnectionString := Connection_string;
    SQL.Text := 'select * from clubs where (idnumber=:club) and (idnumber2=:club2)';
    Parameters.ParamByName('club').DataType := ftInteger;
    Parameters.ParamByName('club').value := 1000;
    Parameters.ParamByName('club2').DataType := ftInteger;
    Parameters.ParamByName('club2').value := 1000;
    open;
    while not(Eof) do
    begin
      showmessage(FieldByName('idnumber').AsString);
      Next;
    end;
    free;
  end;
end;

faut pas chercher de sens a la requête, c'est un exemple , en fait j'ai un paramètre qui est plusieurs fois dans la requête, mais si je mets le même paramètre ça marche pas

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
17
18
 
procedure del;
begin
  with Tadoquery.Create(nil) do
  begin
    ConnectionString := Connection_string;
    SQL.Text := 'select * from clubs where (idnumber=:club) and (idnumber2=:club)';
    Parameters.ParamByName('club').DataType := ftInteger;
    Parameters.ParamByName('club').value := 1000;
    open;
    while not(Eof) do
    begin
      showmessage(FieldByName('idnumber').AsString);
      Next;
    end;
    free;
  end;
end;

c'est a dire que si dans une requete j'ai 5 fois la valeur 1000 a mettre, je suis obligé de faire

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
   Parameters.ParamByName('club1').DataType := ftInteger;
   Parameters.ParamByName('club1').value := 1000;
   Parameters.ParamByName('club2').DataType := ftInteger;
   Parameters.ParamByName('club2').value := 1000;
   Parameters.ParamByName('club3').DataType := ftInteger;
   Parameters.ParamByName('club3').value := 1000;
   Parameters.ParamByName('club4').DataType := ftInteger;
   Parameters.ParamByName('club4').value := 1000;
   Parameters.ParamByName('club5').DataType := ftInteger;
   Parameters.ParamByName('club5').value := 1000;

??


merci

exyacc

[tourlourou]

Si tu sais que c'est le même, il faut alors plutôt utiliser une requête spécifique :

Code sql :

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

select * from clubs where (idnumber=:club) and (idnumber2=idnumber)

Si c'est un hasard, donc une occurrence à l'exécution pas plus fréquente qu'une autre, ben tant pis pour remplir plusieurs fois des paramètres différents avec la même valeur !

[exyacc]

oui pour ça que j'ai dit que c'etait un exemple, en réalité, c'est une grosse grosse requete ou il est plus facile de mettre plusieurs fois le parametre

[tourlourou]

Après, si c'est pour un souci de lisibilité de la requête, tu peux avoir ton SQL :

Code :

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

S := 'select * from clubs where (idnumber=:club) and (idnumber2=:club)';

et faire :

Code :

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

Query.Text := ReplaceStr(S, ':club', IntToStr(ParamClubValue), [rfReplaceAll]);

[exyacc]

c’était surtout pour savoir si c'était normal ou si je faisais pas comme il faut.
donc on peut pas mettre plusieurs fois le même paramètre dans une requête .?

[SergioMaster]

Bonjour,

il semblerait que ADO ait été écrit comme cela, pas de possibilité d'utiliser deux fois un même paramètre. Signalé comme "bug" lors de la version D6 je crois, il a été répondu que cela avait été conçu ainsi. Je ne sais pas si ADO a évolué depuis et comme cet ensemble n'est pas ma tasse de thé ..... En tout cas les sets de composants base de données que j'utilise le permette.
J'ai vu par contre, qu'il n'y avait pas dans ton code de Prepare de la requête avant son exécution, qu'en serait-il dans ce cas là ?