Mehrere Datensätze löschen

[Schuby]

@DeddyH

Ich teste gerade deinen Code, am ende der zeile dies :name ist doch keine var das soll doch der bezeichner in der Datenbank sein ?
AdoQuery1.SQL.Text:= 'DELETE FROM person WHERE person.name = :name'; Die richtige var wird doch hier mit edit1.text übergeben oder ?
AdoQuery1.Parameters.ParamByName('name').AsString := Edit1.Text;
Dann müsste ich doch hiermit alles löschen was den Namen Müller und aus Berlin kommt

Delphi-Quellcode:

AdoQuery1.SQL.Text:= 'DELETE FROM person WHERE person.name = :name and person.ort = :ort';
AdoQuery1.Parameters.ParamByName('name').AsString := Edit1.Text; //Müller 
AdoQuery1.Parameters.ParamByName('ort').AsString  := Edit2.Text; //Berlin

mfg Schuby

[mkinzler]

Nach der Ausführen von AdoQuery1.ExecSQL;

[Schuby]

Sorry ich verstehe es nicht, wenn ich diesen String zusammen baue.

Und nur 1 Datensatz in der Datenbank gefunden wird, bekomme ich keinen Fehler.
Werden aber 2 oder mehr Datensätze gefunden, dann bekomme ich einen Fehler
Bei if AdoQuery1.ExecSQL() = 1

Delphi-Quellcode:

  AdoQuery1.Close;
  ADOQuery1.SQL.Clear;

  AdoQuery1.SQL.Text:= 'DELETE FROM person WHERE person.name = :name and person.ort = :ort';

  AdoQuery1.Parameters.ParamByName('name').Value   := Edit1.text;
  AdoQuery1.Parameters.ParamByName('ort').Value    := Edit2.text;
 
 if AdoQuery1.ExecSQL() = 1 then begin

mfg Schuby

[mkinzler]

Und was für einen? Wenn meht als 1 Satz gelöscht wurde ist die Rückgabe ja <> 1

[Schuby]

Upss jetzt gehts mit <> 1
da war der fehler.!

Danke für eure Hilfe




mfg Schuby

[mkinzler]

Besser > 0 (wenn gelöschte Sätze) oder > 1 (mehr als 1 Satz)