Desactivar botones desplazamiento registro

[torpedo78]

En una base hecha en access 97 he implementado unos botones de desplazamiento por los registros en un formulario (botones creados con el asistente de boton de comando.
... ahora bien ... quiero desactivar el boton anterior si estoy en el primero, desactivar el boton siguiente (si estoy en el ultimo)...
Para insertar en el evento "despues de actualizar" del formulario el codigo que me "disablee" dichos botones necesito saber de donde saco la posicion en la que estoy...


muchas gracias.

[Teri]

La propiedad que te sirve es CurrentRecord

Yo que tú pondría el código en los botones que avanzan y retroceden por los registros en vez de en el formulario, por defecto pones el botón Anterior en disabled.

Un saludo

[torpedo78]

Hola again, lo primero gracias Teri por tus respuestas

solo necesito saber una cosita mas... de que propiedad saco el numero total de registros que tengo para el formulario¿? es decir, ya desactivo los botones anterior o ir al primero cuando estoy en el primero , pero como sé cuando estoy en el ultimo registro ? (para desactivar el boton siguiente y ultimo)

muchas gracias again

[torpedo78]

Al final parece que "mariconeando" un poquito he llegado a una solucion que me sirve... aunque no sé si es muy ortodoxa ... aki la pego por si a alguien le sirve

---------------------------
Private Sub Form_Current()
Dim ultimo As Integer
ultimo = Me.RecordsetClone.RecordCount


If CurrentRecord > 1 Then
Me.Anterior.Enabled = True
Me.Primero.Enabled = True
End If

If CurrentRecord = 1 Then
Me.Anterior.Enabled = False
Me.Primero.Enabled = False
End If


If CurrentRecord = ultimo Then
Me.Siguiente.Enabled = False
Me.ultimo.Enabled = False
End If

If CurrentRecord < ultimo Then
Me.Siguiente.Enabled = True
Me.ultimo.Enabled = True
End If

--------------
ai veces k solo ai k kaminar un pokito para llegar a la meta ...

[torpedo78]

no se por que pero la primera vez que entro en el formulario el codigo anterior me devuelve que el ultimo registro es el 1 ... en cambio cuando añado uno o realizo un desplazamiento por los registros ya me recoge el numero correcto de registros totales... alguien sabe por que me.recordsetclone.recorcdcount me devuelve 1¿?¿?¿?

thnks again

-----------
parece que habia alguna piedra por el camino...o algoooo

[Teri]

Puedes probar a nada más abrirlo hacer lo siguiente

Dim rs as recordset

set rs = me.recordsetclone

rs.movelast

ultimo = rs.recordcount

rs.close

[torpedo78]

problema solucionado

...aunK vaya cosas tiene el access...

esto sta zanjado ...aora a ponerme kon otra kosa y .... cuando no vea la salida por aki re-aparecere...

Gracias again teri