Fehler beim Suchen

[Rippo]

Hallo

Ich habe mit folgendem Code eine Suche erstellt

Delphi-Quellcode:

                        //Funktion um zu Suchen
Function TfrmKundenstamm.Suchen(aSuchbegriff: string) : Boolean;
var aktSuchtext : string;
Begin
  aktSuchtext :='%'+Ansiuppercase(aSuchbegriff)+'%';

  DMMain.SDS_K.Close;
  DMMain.SDS_K.DataSet.CommandText := //Welche Felder sollen durchsucht werden
      ' Select * from KStamm  where Upper(ks_Schlüsselnummer) or Upper(ks_name) or Upper(ks_email) or Upper(ks_ort) like ' + QuotedStr(aktSuchtext);

  DMMain.SDS_K.Open;
  //if (Not DMMain.SDS_K.IsEmpty) then
end;

Jetzt wenn ich suche, bekomme ich die 'Fehlermeldung' --> Token unknown - line1, column 57 or.


Was habe ich falsch gemacht?

[Sir Rufo]

Such mir bitte alle Namen aus dem Telefonbuch, wo der Name in Grossbuchstaben.

Kannst du das rein formal betrachtet erledigen?

Eben, kann die Datenbank auch nicht

Und Parameter sind auch immer gerne gesehene Gäste ...

[baumina]

SQL-Code:

Select * 
  from KStamm 
where ks_Schlüsselnummer containing :Suchbegriff
   or ks_name containing :Suchbegriff
   or ks_email containing :Suchbegriff
   or ks_ort containing :Suchbegriff

[DeddyH]

Und rein formal (damit Firebird das auch versteht) müsste es lauten:

SQL-Code:

WHERE
  Feld1 LIKE Suchbegriff
OR
  Feld2 LIKE Suchbegriff
OR
  Feld3 LIKE Suchbegriff
--usw. usf.

[p80286]

3x der selbe Parameter? (:Suchbegriff)
Ich hab irgendwie im Hinterkopf, das das Ärger gibt.

SQL-Code:

where feld1 like :Suchbegriff1
   or feld2 like :Suchbegriff2
   or feld3 like :Suchbegriff3

sollte auf jeden Fall gehen.

Gruß
K-H

[mkinzler]

Und warum kein CONTAINING? Sollte schneller sein.

[baumina]

Zitat von p80286:

3x der selbe Parameter? (:Suchbegriff)
Ich hab irgendwie im Hinterkopf, das das Ärger gibt.

War glaub nur ein ADO-Problem.

[p80286]

Ah ja

Gruß
K-H