StoredProcedure mit ADO und MS SQL Server 2000

[shmia]

Zitat von testoli:

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
begin
try
DM.DM_Main.SP_NEW_ADRTYP.Parameters.Refresh;
DM.DM_Main.SP_NEW_ADRTYP.Parameters.ParamByName('@ADRT_WERT_2').Value := TB_Wert.Text;
DM.DM_Main.SP_NEW_ADRTYP.Open;

except
exit;

end;

Wenn ich den Befehl sende, erhalte ich folgenden Fehler:
"Commandtext gibt keine Ergebnissmenge zurück!"
Was habe ich nicht beachtet???

Nur Abfragen mit SELECT geben eine Ergebnismenge zurück. Diese werden mit .Open geöffnet.
Alles andere (INSERT, UPDATE, DELETE, ALTER ...) gibt keine Ergebnismenge zurück und wird mit
.ExecSQL ausgeführt.
Übrigens, folgendes sollte man nicht tun:

Delphi-Quellcode:

try
    // Zugriff auf Datenbank
    DM.DM_Main.SP_NEW_ADRTYP.ExecSQL;
except
   exit;
end;

Der Datenbankzugriff funktioniert nicht, keine Fehlermeldung erscheint (nur in der IDE) und keiner weiss warum die Sache nicht funktioniert.
Dann lieber try ... except komplett weglassen.