SQL Datensätze mit einem bestinmmten Wert ausgeben

[berndberndbernd5b]

Hallo!
Ich möchte eine Suche erstellen

Wie kann ich alle Datensätze ausgeben, die einen bestimmten Wert beinhalten, aber in jedem Feld.

Also ich möchte die DB sequenziell durchsuchen.

Wie kann man das realisieren ?

[Hansa]

mit :

SQL-Code:

where

Rest : steht in jedem Handbuch. :mrgreen:

[berndberndbernd5b]

hi

klar das ist nicht das Problem.

ich möchte in jedem feld suchen.

also nicht

Select * From Tabelle Where Feld = Variable


Feld soll alle Felder sein. Ist halt wegen der Suche.
Ich habe eine Datenbank mit Kundendaten, wie Ort, Name ....
Der User soll dann z.B. den Namen eintippen können und der Datensatz soll erscheinen, wenn er den ort eingibt aber auch.

verstehst du, das ist mein problem.

kann man das irgendwie mit or oder so machen, Ka

[alzaimar]

Kann man:

Delphi-Quellcode:

select * from Table where Feld1=:Foo or Feld2=:Foo or Feld3=:Foo

[berndberndbernd5b]

jo ich versuch das mal

Danke

[berndberndbernd5b]

jo klappt


so:
select * from Table where Feld1=Foo or Feld2=Foo or Feld3=Foo

Also ohne :, der meinte, dass ich dem Feld einen Typ zuweisen würde ...

Danke auf jedenfall

[GuenterS]

Der ':' hätte besagt, dass dies ein Parameter ist, den Du im Programm dann über Query.ParamByName('Foo').AsString := 'blabla' hättest befüllen können (bevor du die Query aufmachst).

[Sharky]

Zitat:

Zitat von berndberndbernd5b

... Also ohne :, der meinte, dass ich dem Feld einen Typ zuweisen würde ...

Hai Du,

mit dem Doppelpunkt wird in dem SQL-Query angezeigt das es sich dabei um einen Parameter handelt. Diesen musst Du nach dem setzen des SQL.Text noch mit Werten füllen ParamByName.

Edit: Guenter war schneller

[berndberndbernd5b]

ich hab anstatt Foo auch einfach die Variable genommen


Kannst du mir das mit den parametern erklären ?

[GuenterS]

ok, ich mach eine kleine Procedure, als Beispiel...

ausgehend von folgender Tabellenstruktur der Tabelle Kunden

Code:

KundenID | KundenName
---------|-----------
   1     | Huber
   2     | Meier
   3     | Müller

Delphi-Quellcode:

function getKundenName(aKundenID: integer):string;
begin
   Result := '';
   with TQuery.Create(nil) do
   try
      DatabaseName := 'meineDatenbank';
      SQL.Text := 'SELECT KundenName FROM Kunden WHERE KundenID = :KID';
      ParamByName('KID').AsInteger := aKundenID;
      Open;
      if (not IsEmpty) then
         Result := FieldByName('KundenName').AsString;
      Close;
   finally
      Free;
   end;
end;

Natürlich hättest Du hier in diesem Beispiel auch schreiben können

Delphi-Quellcode:

function getKundenName(aKundenID: integer):string;
begin
   Result := '';
   with TQuery.Create(nil) do
   try
      DatabaseName := 'meineDatenbank';
      SQL.Text := Format('SELECT KundenName FROM Kunden WHERE KundenID = %d', [aKundenId]);
      Open;
      if (not IsEmpty) then
         Result := FieldByName('KundenName').AsString;
      Close;
   finally
      Free;
   end;
end;

Hätte hier das gleiche bewirkt.

[berndberndbernd5b]

hi

sucht der damit alle Felder ab ???

Das mit dem Aufzählen ist ein wenig umständlich, aber es klappt :-)

[GuenterS]

Nein, tut er nicht. Das wird auch mit 99%iger Wahrscheinlichkeit nicht so einfach gehen, müßtest halt für jedes Feld einen Parameter machen, könntest auch denselben verwenden, sofern die Feldtypen passen.

Das Beispiel, was ich weiter oben gepostet habe, war eben auch nur ein Beispiel, Du kannst die Where Clauseln ja leicht mit And oder or verknüpfen, wie es alzaimer noch weiter oben auch schon geschrieben hat. Ich wollte Dir nur die Verwendung von Parametern in einer Query zeigen.

Wenn Deine Query länger existiert als in dem Beispiel, vielleicht durch eine Komponente, machen Parameter natürlich mehr Sinn. Da brauchst dann nicht den SQL.Text Inhalt neu schreiben sondern einfach den Parameter also Dein Suchkriterien auf einen anderen Wert setzen und die Query neu aufmachen.

[berndberndbernd5b]

jo