Access - Ir a registro suiguiente

 
Vista:

Ir a registro suiguiente

Publicado por Nestor (14 intervenciones) el 23/04/2007 13:16:20
Hola a todos.
Tengo en un formulario insertado dos botones para ir al registro siguiente y anterior .
Lo que quiero es que cuando llegue al ultimo registro y pulse nuevamente no me permita este boton insertar un nuevo registro, ya que esto lo realizo con otro boton, lo mismo que con el boton de ir a registro anterior es decir que cuando llegue al primer registro se bloquee, es decir que actuen como los botones que ya vienen en acces.
Este es el evento que coloque en el boton ir al siguiente registro:

Private Sub Comando63_Click()
On Error GoTo Err_Comando63_Click

DoCmd.GoToRecord , , acNext
Me.Contador = Me.Contador + 1
Me.Refresh
Exit_Comando63_Click:
Exit Sub

Err_Comando63_Click:
MsgBox Err.Description
Resume Exit_Comando63_Click

End Sub

Y este es el del boton ir al registro anterior:

Private Sub Comando62_Click()
On Error GoTo Err_Comando62_Click

DoCmd.GoToRecord , , acPrevious
If Me.Contador <= 1 Then Exit Sub
Me.Contador = Me.Contador - 1
Me.Refresh

Exit_Comando62_Click:
Exit Sub

Err_Comando62_Click:
MsgBox Err.Description
Resume Exit_Comando62_Click

End Sub
Si alguien conoce la solución se los agradesco.
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

RE:Ir a registro suiguiente

Publicado por Jonathan Fernandez (85 intervenciones) el 23/04/2007 13:30:12
podrias hacer que cuando llegue al primer registro ponga el boton a enabled osea me.boton.enabled=true y asi cuando llega al ultimo registro eso me ha funcionado a mi suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ir a registro suiguiente

Publicado por Nestor (14 intervenciones) el 23/04/2007 16:38:29
Jonathan me podrias explicar en que lugar coloco lo que me estas indicando, ya que soy nuevo en esto, gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar