Error de actualización
RsMovim.MoveFirst
Do While RsMovim.EOF = False
Orden = Orden + 1
RsMovim!Orden = Orden
RsMovim.Update
RsMovim.MoveNext
TxtOrdenados.Text = Orden
DoEvents
Loop
Cuando llega al registro 1289 me salta un error -2147467259 y no se porque pasa esto ya que es una actualización mu simple.
Gracias.
Diego
Do While RsMovim.EOF = False
Orden = Orden + 1
RsMovim!Orden = Orden
RsMovim.Update
RsMovim.MoveNext
TxtOrdenados.Text = Orden
DoEvents
Loop
Cuando llega al registro 1289 me salta un error -2147467259 y no se porque pasa esto ya que es una actualización mu simple.
Gracias.
Diego
1 Respuesta
Respuesta de denciso
1
Modifica lo siguiente:
RsMovim. MoveFirst
Do While RsMovim.EOF = False
Orden = Orden + 1
RsMovim!Orden = Orden
RsMovim.Update
RsMovim.MoveNext
if not RsMovim.Eof then
TxtOrdenados.Text = Orden
end if
DoEvents
Loop
Lo anterior es porque debes de estar saliendo del grupo de datos que presenta el recordset.
RsMovim. MoveFirst
Do While RsMovim.EOF = False
Orden = Orden + 1
RsMovim!Orden = Orden
RsMovim.Update
RsMovim.MoveNext
if not RsMovim.Eof then
TxtOrdenados.Text = Orden
end if
DoEvents
Loop
Lo anterior es porque debes de estar saliendo del grupo de datos que presenta el recordset.
