Gato,
Le creo necesitar hacerlo levemente diferentemente, como usar los yeilds del método de la ejecución un delantero solamente, leí solamente el recordset. Intentarlo esta manera:
Función pública GetRecordSet () como ADODB.Recordset
CNN dévil como nuevo ADODB.Connection
CNN. Abrir el sqlServerConnection
cnn.CursorLocation = adUseClient
Cmd dévil como ADODB.Command
Fijar el cmd = nuevo ADODB.Command
cmd.ActiveConnection = CNN
cmd.CommandType = adCmdStoredProc
cmd.CommandText = “StoredProcName”
Rs déviles como nuevo ADODB.Recordset
Fijar el cmd de GetRecordSet = de rs.open, adOpenKeyset, adLockOptimistic, adCmdStoredProc
Terminar la función
JimD.