
11/12/2002, 23:08
|
| | Fecha de Ingreso: noviembre-2002 Ubicación: DF
Mensajes: 1.056
Antigüedad: 22 años, 3 meses Puntos: 37 | |
Lo arreglas con un bookmark:
Para eso, yo abro la tabla asi:
rsUsuario.CursorLocation = adUseClient
rsUsuario.Open "Usuarios Order By idUsuario", Application("conn"), adOpenDynamic, adLockOptimistic, adCmdTable
rsUsuario.AddNew
y luego, de actualizar, recuperas el ultimo registro agregado donde quedo el bookmark:
dim bookMark
rsUsuario.Update
bookMark = rsUsuario.AbsolutePosition
rsUsuario.Requery
rsUsuario.AbsolutePosition = bookMark
iKeyID = rsUsuario.Fields("idUsuario" ) |