Zitat von
Peeters:
Delphi-Quellcode:
CREATE PROCEDURE SP_IMPORT_FORM
@FormNr VARCHAR(5) = NULL,
@FormBez VARCHAR(30) = NULL
AS
IF NOT EXISTS (SELECT * FROM MPK_FORM WHERE FORMNR = @FormNr)
BEGIN
INSERT INTO MPK_FORM (FORMNR, BEZ_DEU) VALUES (@FormNr, @FormBez)
END
GO
ausführe, bekomme ich eine Fehlermeldung die lautet: "ADOStoredProc: CommandText gibt keine Ergebnismenge zurück".
Du musst anstelle von ADOStoredProc.Open oder .Active := True die Procedure ADOStoredProc.
ExecProc aufrufen!