Recibir un cursor desde un store procedure

[Diego]

Hola a todos, tendo un problema con una rutina de vb que
me ejecuta un store procedure de SQL Server, el cual tiene
dos parámetros de entrada y uno de salida, que es un
cursor. Cuando ejecuto la rutina me genera el
error "Arguments are of the wrong type, are out of
acceptable range, or are in conflict with one another.
".

La funcion es la siguiente:

Dim ObjCommand As New ADODB.Command
Dim rsD As New ADODB.Recordset
Dim msSQL As String

ObjCommand.ActiveConnection = gstrCadenaConexion
ObjCommand.CommandText = "spTraeInstituciones"
ObjCommand.CommandType = adCmdStoredProc

ObjCommand.Parameters.Append ObjCommand.CreateParameter
("CodDANE_p", adBSTR, adParamInput, 15, CodDANE)
ObjCommand.Parameters.Append ObjCommand.CreateParameter
("CodJorna_p", adInteger, adParamInput, , CodJorna)
ObjCommand.Parameters.Append ObjCommand.CreateParameter
("Datos_p", adIUnknown, adParamOutput, , rsD)

ObjCommand.Execute

Set ObjCommand = Nothing

Set TraeInstitucion = rsD
.....

¿Cómo hago para tomar el cursor que envía el store
procedure?

Gracias de antemano

[Mauricio Henao]

Hola, se que ha pasado tiempo, pero ... lo solucionaste?
Me podrias decir como lo hiciste?

Gracias!