Bouton suivant, précédent

salut

j'ai fait un bouton suivant et précedent pour passer d'un enregistrement dans un data à un autre

je voudrais que quand je suis sur le premier enregistrement le bouton précédent soit inactif et pareil pour le dernier enregistrement le bouton suivant devra etre inactif.

j'ai réussi a faire que rendre inactif un bouton quand je suis sur l'enreg avant le premier

voici mon Code:

Private Sub datadde_Reposition()
....
If datadde.Recordset.BOF Then
cmdsuivant.Enabled = True
cmdprecedente.Enabled = False
ElseIf datadde.Recordset.EOF Then
cmdsuivant.Enabled = False
cmdprecedente.Enabled = True
Else
cmdsuivant.Enabled = True
cmdprecedente.Enabled = True
End If
....
End Sub


et voila ce qu'il y a dans mes boutons précédent et suivant :

Code:
Private Sub cmdprecedente_Click()
On Error Resume Next
If (Not datadde.Recordset.BOF) Then
datadde.Recordset.MovePrevious
End If
End Sub


Code:
Private Sub cmdsuivant_Click()
On Error Resume Next
If (Not datadde.Recordset.EOF) Then
datadde.Recordset.MoveNext
End If
End Sub

mais je voudrais pas pouvoir aller ni avant le 1er enreg ni après le dernier enreg

merci de votre aide

Utilise la propriété absolutePosition du recordset.

A chaque clic sur precedent et suivant tu verifit si

if datadde.Recordset.AbsolutePosition=0 then
'Tu est sur le 1er enreg

If datadde.Recordset.AbsolutePosition=datadde.recordset.Recordcount - 1 then
'Tu est au dernier enreg