Abfrage ob Insert erfolgreich war

[diexsie]

Hätte mal eine Frage.

Wie kann man prüfen, ob ein Insert Statement erfolgreich ausgeführt wurde?
Benutze die Komponenten von Zeos.

Mein Code bis jetzt:
//query: TZQuery;
query.SQL.Clear;
query.SQL.Add('sqlstatement');
query.ExecSQL;

sowas wie:

var
result:bool;
result := query.SQL.Add('sqlstatement');

funktioniert leider nicht...

Irgendwelche Vorschläge? Vielen Dank schonmal in voraus.

[DeddyH]

Kannst Du AffectedRows abfragen? Ich bin gerade nicht sicher, ob das mit ZEOS geht.

[Bernhard Geyer]

Zitat:

Zitat von diexsie

Wie kann man prüfen, ob ein Insert Statement erfolgreich ausgeführt wurde?

Wenn's nicht erfolgreich ist wird die Datenbank/Komponente ein Exception werfen.

[Gollum]

Hallo,

ich kenne die ZEOS-Lib nicht aber so müsste es funktionieren:

Delphi-Quellcode:

query.SQL.Text:='sqlstatement';
query.ExecSQL; 
if (query.RowsAffected=1) then ShowMessage('1 Datensatz erfolgreich eingefügt!');

[diexsie]

Habe es jetzt mit der Exceptionidee gelöst. Bei fehlerhaftem Insert wird die EZSQLException geworfen.
Leider kennt mein Delphi diese Exception nicht. Habe daher leider die Standardexception Klasse "Exception" verwendet.
Wie kann ich in mein Delphi die EZSQLException Klasse importieren?

[alzaimar]

Indem Du herausfindest, in welcher Unit diese Klasse deklariert ist und diese Unit in deine Uses-Klausel mit aufnimmst.

Zitat:

Zitat von Gollum

Delphi-Quellcode:

..
if query.RowsAffected > 1 then 
  ShowMessage('1 Datensatz erfolgreich eingefügt!');

Wäre ja denkbar, das das INSERT mehr als eine Zeile einfügt bzw. die Anweisung Auswirklungen auf mehr als eine Zeile hat.

[hoika]

Hallo,

ich schätze mal, die Exception ist in

ZSysUtils

definiert.

Ein simples Suchen per Explorer oder Grep wäre ne Lösung.


Heiko