Zugriffsfehler ADOQuery

[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