Slt. Je développe une petite application débutante de gestion des films, j'utilise vb6, et Access comme SGBD, et je lie ma BD via un contrôle data.
Pour parcourir les enregistrements dans ma BD, et les afficher dans les TextBox appropiés, j'ai ajouté 2 boutons : "précédant" et "suivant" , ça donne le 1er et le 2eme enregistrement, mais s'arrête à cause d'un débogage, et pointe la ligne jaune dans la 1ère ligne de la méthode suivant les cas.
Voilà le code :
Code vb : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Private Sub CommandPrecedant_Click()
    Data1.Recordset.MovePrevious
    If Data1.Recordset.BOF Then
        Beep
        Data1.Recordset.MoveFirst
    Else
        Remplir
    End If
    Remplir
End Sub
 
Private Sub CommandSuivant_Click()
    Data1.Recordset.MoveNext
    If Data1.Recordset.EOF Then
        Beep
        Data1.Recordset.MoveLast
    Else
        Remplir
    End If
End Sub
Si vous avez des suggestions, elle sont les bienvenue..Merci
PS : peut être qu'il y a une méthode pr accéder à la BD via l'ODBC, mais en 1er lieu, je veux le faire par le contrôle Data.Merci