Как в VB передать из ХП MSSQLServer курсор?

Формулировка задачи:

Уважаемые знатоки, подскажите пожалуйста,
Имеется хранимая процедура на VSSQLServer, имеющая выходным параметром курсор
Как этот курсор передать в Recordset?
Проблема в том, что в перечне типов параметров Command нет ничего похожего на курсор.
Пробовал:

Также пробовал:

Сообщение на IF строке: Операция не допускается если объект закрыт.
А хочется получить данные из уже готовой ХП!
Спасибо всем кто ответит.

Решение задачи: «Как в VB передать из ХП MSSQLServer курсор?»

textual
                            Листинг программы 
                        

                            CREATE PROCEDURE [dbo].[ddd] 

@id_dog1 INT

<font color="blue">AS</font>

<font color="blue">DECLARE</font> @nomer <font color="blue">CHAR</font>(<font color="darkblue"><b>20</b></font>)
<font color="blue">DECLARE</font> @data <font color="blue">DATETIME</font>

<font color="blue">SELECT</font> @nomer=nomer, @data=data
FROM view_dog1_readonly
WHERE id_dog1=@id_dog1

<font color="blue">RETURN</font> <font color="blue">SELECT</font> *
FROM view_dog1_readonly
WHERE nomer=@nomer <font color="blue">AND</font> data=@data
GO

                        