ADOStoredProc

← →
freeman82 (2004-06-09 16:43) [0]

Почему при повторном вызове процедуры выдается сообщение об ошибке.
proc1;
begin
with DM1.SP1 do begin
if active then active:=false;
ProcedureName :="Add";
Parameters.Refresh;
Parameters.ParamByName("@ID").Value:=ID;
Parameters.ParamByName("@Type").Value:=Combobox4.text;
Parameters.ParamByName("@Volume").Value:=edit2.text;
ExecProc;
end;
end;

← →
bushmen © (2004-06-09 16:54) [1]

А какая ошибка-то? А создаешь параметры когда?

← →
freeman82 (2004-06-09 17:01) [2]

>bushmen
>А какая ошибка-то?
Access violation at adress ... in module SQLOLEDB.DLL
>А создаешь параметры когда?
Parameters.Refresh;

← →
bushmen © (2004-06-09 17:11) [3]

Так а удалять эти параметры после выполнения процедуры не пробовал?

← →
freeman82 (2004-06-09 17:14) [4]

Пробывал,не помогает.И если я не ошибаюсь при вызове Parameters.Refresh; список пар-ов обновляется.

← →
bushmen © (2004-06-09 17:22) [5]

Кстати, а в uses указал ADODB ?

← →
freeman82 (2004-06-09 17:28) [6]

>bushmen
> а в uses указал ADODB ?
а зачем?
with DM1.SP1
...
uses DM1
при повторном вызове процедуры

← →
freeman82 (2004-06-09 17:44) [7]

with DM1.SP1 do begin
if active then active:=false;
ProcedureName :="Add";
Parameters.Refresh;
Parameters.ParamByName("@ID").Value:=ID;
Parameters.ParamByName("@Type").Value:=Combobox4.text;
Parameters.ParamByName("@Volume").Value:=edit2.text;
Prepared := false;
ExecProc;

end;
и все работает
Спасибо,Гавриленко Сергей Алексеевич и SQL.ru

← →
freeman82 (2004-06-09 17:52) [8]

Да кстати попробывал без Prepared := false и с MDAC 2.6 работает без ошибок.
Видимо глюки в MDAC 2.70.9001.0.

А попробуй mdac 2.8

ADOStoredProc Найти похожие ветки