Visual Basic - Error 3219. No me permite mover con Moveprevious

Life is soft - evento anual de software empresarial
 
Vista:

Error 3219. No me permite mover con Moveprevious

Publicado por Raul (9 intervenciones) el 20/06/2004 14:11:34
Los resultados que tengo almacenados en el objeto Recordset me provienen de un cursor de un procedimiento ejecutado en Oracle, me muevo bien con el MoveNext pero a la hora de querer ir hacia atrar en los valores con MovePrevious no me funciona.

El error es el siguiente:
Error 3219: La operacion no esta permitida en este contexto.

Creo q tiene que ver con la declaracion de la variable RecordSet. El codigo donde creo la conexion es el siguiente:

Global rcs As New ADODB.Recordset

Dim parametro As ADODB.Parameter
Set parametro = New ADODB.Parameter
Set Cnnconexion = New ADODB.Connection
Set rcs = New ADODB.Recordset
conn = "UID=" & LOGIN & ";PWD=" & CONTRASEÑA & ";driver....
cadenaconexion = "PROVIDER = OraOLEDB.Oracle.1;....
Cnnconexion.Open cadenaconexion
Set cmd = New ADODB.Command
With cmd
Set .ActiveConnection = Cnnconexion
.CommandType = 1
.Properties("PLSQLRSet") = True
.CommandText = "{CALL RAUL.PAQ_RAUL.combo_dev_nombreproductos()}"
End With
Set rcs = cmd.Execute
cmd.Properties("PLSQLRSet") = False
exito = True

Y en otro formulario a traver de la variable global rcs, el mismo codigo para el MoveNext si q me funciona y compruebo que no estoy en el primer registro ya, el codigo esta simplificado.
With rcs
.MovePrevious
Tnombrepro.Text = .Fields(0).Value
Tstockpro.Text = .Fields(1).Value
Tpreciopro.Text = .Fields(2).Value
End With
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder