Discussion :

[colfire_dev]

je voudrais faire une recherche multicritere sur une table personne, un peu à la google:
l'utilisateur saisie via des Edit et ComboBox, ces derniers sont insérés ds la requete.
j'ai commencé par faire ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
with dm.tbPersonne do
  begin
    Close;
    SQL.Clear;
    SQL.Add('Select * from personne');
    SQL.Add('where nom LIKE ''' + eNom.Text + Opr1 + '''');
    SQL.Add('service LIKE ''' + cbService.Text + '''');
    SQL.Add('matricule LIKE ''' + eMatricule.Text + '''');
    SQL.Add('fonction LIKE ''' + cbFonction.Text + '''');
    SQL.Add('order by nom');
    Open;
  end;

mais élas c genere une erreur de syntaxe que je n'arrive pas à détécter

[colfire_dev]

Voilà la procedure en entier pour mieux comprendre.

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
21
22
23
24
25
26
27
28
29
30
procedure TfMenu.bGoClick(Sender: TObject);
var Opr1, Opr2, Opr3, Opr4, Opr5, Opr6, Opr7 : String;
begin
  if eNom.Text = '' then Opr1 := 'OR'
                    else Opr1 := 'AND';
  if cbService.Text = '' then Opr2 := 'OR'
                         else Opr2 := 'AND';
  if cbFonction.Text = '' then Opr3 := 'OR'
                          else Opr3 := 'AND';
  if ecin.Text = '' then Opr4 := 'OR'
                     else Opr4 := 'AND';
  if eEtat.Text = '' then Opr5 := 'OR'
                     else Opr5 := 'AND';
  if eType.Text = '' then Opr6 := 'OR'
                     else Opr6 := 'AND';
  if eMatricule.Text = '' then Opr7 := 'OR'
                          else Opr7 := 'AND';
  with dm.tbPersonne do
  begin
    Close;
    SQL.Clear;
    SQL.Add('Select * from personne');
    SQL.Add('where nom LIKE ''' + eNom.Text + Opr1 + '''');
    SQL.Add('service LIKE ''' + cbService.Text + Opr2 + '''');
    SQL.Add('matricule LIKE ''' + eMatricule.Text + Opr7 +'''');
    SQL.Add('fonction LIKE ''' + cbFonction.Text + Opr3 +'''');
    SQL.Add('order by nom');
    Open;
  end;
end;

[qi130]

L'opérateur ne doit pas être dans la chaine recherchée....

En plus, la recherche par LIKE induit au moins un caractère %

[colfire_dev]

je suis carrement bloque, vous avez une suggetion?

[ero-sennin]

Salut,

Moi je verrai plus un truc du genre :

Code :

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

1
2
3
4
5
6
SQL.Add('Select * from personne');
SQL.Add('where nom LIKE "%'+ eNom.Text+'%"');
SQL.Add(Opr1+'service LIKE "%'+ cbService.Text+'%"');
SQL.Add(Opr2+'matricule LIKE "%'+ eMatricule.Text+'%"');
SQL.Add(Opr7+'fonction LIKE "%'+ cbFonction.Text+'%"');
SQL.Add(Opr3+'order by nom');

Et un truc me chagrine, c'était la fonction LIKE ... en effet, comme le dit qi130, il doit y avoir un % ....


Essaie de voir avec le code que je t'ai fourni (pas testé du tout ...)
A+

[colfire_dev]

ca genere une erreur de syntaxe, au niveau du order by

[ero-sennin]

Code :

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

1
2
3
4
5
6
SQL.Add('Select * from personne');
SQL.Add('where nom LIKE "%'+ eNom.Text+'%"');
SQL.Add(Opr1+'service LIKE "%'+ cbService.Text+'%"');
SQL.Add(Opr2+'matricule LIKE "%'+ eMatricule.Text+'%"');
SQL.Add(Opr7+'fonction LIKE "%'+ cbFonction.Text+'%"');
SQL.Add('order by nom');

Il n'y a pas d'opérateur avant un order by ...
A+