Jack,
Ik geloof u het moet doen lichtjes verschillend, zoals gebruikend uitvoert methode yeilds voorwaarts slechts, slechts recordset leest. Probeer het deze manier:
Overheidsfunctie GetRecordSet () als ADODB.Recordset
Schemerige cnn als Nieuwe ADODB.Connection
cnn. Open sqlServerConnection
cnn.CursorLocation = adUseClient
Schemerige cmd als ADODB.Command
Reeks cmd = Nieuwe ADODB.Command
cmd.ActiveConnection = cnn
cmd.CommandType = adCmdStoredProc
cmd.CommandText = „StoredProcName“
Schemerige rs als Nieuwe ADODB.Recordset
Vastgestelde GetRecordSet = rs.open cmd, adOpenKeyset, adLockOptimistic, adCmdStoredProc
De Functie van het eind
JimD.