Zugriffsfehler ADOQuery

[t0mmy]

Hallo!

Also ich bekomme einen Fehler:

Zitat:

Zugriffsverletzung bei Adresse 00639556 in Modul 'Programm.exe'. Lesen von Adresse 0000000.

und das wenn ich Zweimal ein Query in meinem Programm verwende.


Die sieht folgendermaßen aus:

Delphi-Quellcode:

  with ADOQuery_1 do
  begin
    Close;
    SQL.Clear;
    SQL.Text := 'DELETE FROM Tabelle2'+
                'WHERE Spalte1 LIKE '''+
                NummerString2+'''';
    ExecSQL;

    SQL.Clear;
    SQL.Text := 'DELETE FROM Tabelle1 '+
                'WHERE Spalte1 LIKE '''+
                NummerString2+'''';
    ExecSQL;
    Close;
  end;

Sobald das Query den SQL befehl zugewiesen bekommt schreibt er den Fehler.(Hab ich mit Haltepunkten festgestellt) woran könnte das liegen ich möchte keine eigene Query verwenden!

[Bernhard Geyer]

Da hast du wohl entweder deine Query nicht erzeugt oder woanders frei gegeben.

[mkinzler]

-Existiert den die Instanz?
-Irgendwelche persistenten (Zugriffs-)felder?
Btw. Die Clearanweisungen sind überflüssig.

[t0mmy]

Die Query ist erzeugt.. Wie meinst du das mit dem Freigeben?
Auch das clear löst den fehler nicht -.-

[DeddyH]

Delphi-Quellcode:

Assert(Assigned(ADOQuery1));
ADOQuery_1.Close;
ADOQuery_1.SQL.Text := 'DELETE FROM Tabelle2'+
                'WHERE Spalte1 LIKE '''+
                NummerString2+'''';
ADOQuery_1.ExecSQL;
ADOQuery_1.SQL.Text := 'DELETE FROM Tabelle1 '+
                'WHERE Spalte1 LIKE '''+
                NummerString2+'''';
ADOQuery_1.ExecSQL;

Was kommt hierbei? Übrigens solltest Du das Dingen besser parametrisieren.

[t0mmy]

Bei deinem Code kommt wieder einer Zugriffsverletzung -.-

[DeddyH]

Und in welcher Zeile?

[p80286]

wie wäre es hiermit:

Code:

ADOQuery_1.Close;
ADOQuery_1.SQL.Text := 'DELETE FROM Tabelle2'+
                'WHERE Spalte1 LIKE '''+
                NummerString2+'''';
ADOQuery_1.ExecSQL;
ADOQuery_1.Close;
ADOQuery_1.SQL.Text := 'DELETE FROM Tabelle1 '+
                'WHERE Spalte1 LIKE '''+
                NummerString2+'''';
ADOQuery_1.ExecSQL;
ADOQuery_1.Close;

Gruß
K-H

[DeddyH]

Spinne ich, oder ist nach ExecSQL die Datenmenge sowieso geschlossen? Ich hege wie meine Vorredner ja auch eher den Verdacht, dass die Query gar nicht mehr (oder noch nicht) existiert, aber nicht nil ist.

[Sir Rufo]

Wenn das so ausgeführt wird, dann sollte zunächst mal ein Fehler vom SQL Server zurückkommen, denn hinter Tabelle2 fehlt ein Leerzeichen ;)