Вызов MySQL процедуры c OUT параметром

[Victor27]

Имеется Visual Basic 6.0 приложение, из которого вызывается простая MySQL процедура:

DROP PROCEDURE IF EXISTS fb.test;
CREATE PROCEDURE fb.`test`(
in id int,
in name varchar(10),
out nr int)
BEGIN
declare i int default 0;
set i=5;
set nr=i;
END;

Вызов процедуры из Visual Basic:

Set cmd = New ADODB.Command
Set inParam = New ADODB.Parameter
Set outParam = New ADODB.Parameter

cmd.CommandType = CommandTypeEnum.adCmdStoredProc
cmd.CommandText = "fb.test"
If conn.State = 0 Then createConnection (conn - Connection-объект)
conn.CursorLocation = adUseServer
cmd.ActiveConnection = conn

Set inParam = cmd.CreateParameter("id", adInteger, adParamInput, 11, 0)
cmd.Parameters.Append inParam
cmd.Parameters("id").Value = 10

Set inParam = cmd.CreateParameter("name", adVarChar, adParamInput, 10, "")
cmd.Parameters.Append inParam
cmd.Parameters("name").Value = "Petrov"

Set outParam = cmd.CreateParameter("nr", adInteger, adParamOutput)
cmd.Parameters.Append outParam
Set rs = cmd.Execute

cmd.Execute выдает ошибку:
[MySQL][ODBC 5.1 Driver][mysqld-5.1.47-community-nt]OUT or INOUT argument 3 for routine
fb.test is not a variable or NEW pseudo-variable in BEFORE trigger.

MySQL Server работает локально под WinXP. Без OUT параметра процедура вызывается без проблем.

В чем причина?

[HandKot]

а в этой процедуцре точно есть 3 параметр?

[Victor27]

а в этой процедуцре точно есть 3 параметр?

Третий параметр как раз и есть OUT-параметр.

[HandKot]

а что должны получить на выходе?
и рекордсет и переменную?

посмотрев инет предлагают два варианта
1. отказатся от OUT параметра и возвращать его из процедуры селектом
SELECT MyOutPut from dual;

2. либо наподобии этого

Код: Выделить всё

$query = "CALL sel_realty(1, @p1)";
mysqli_real_query($link, $query) or die (mysqli_error($link));
$res = mysqli_real_query($link, "SELECT @p1");

доработать до АДО не должно быть особых проблем

[SLIM]

Мне кажется что out-параметр не вытянуть во вне.