Bonjour,

j'ai récupéré un formulaire d'une autre base acces pour l'inserer dans ma base (acces 2003), parcontre j'ai une erreur quand j'ouvre ce formulaire (ligne jaune).

et pourtant sur l'ancienne base ce formulaire fonctionne correctement


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Form_Open(Cancel As Integer)
Dim rsStock As Recordset

' compte le nombre d'enregistrement
Set rsStock = bd.OpenRecordset("SELECT Count (*)AS nb_enreg FROM stock")nb_enreg = rsStock!nb_enreg
rsStock.Close
DoCmd.Maximize
filtre = ""
tri = ""
Me.Filter = filtre
Me.FilterOn = True
Me.OrderBy = tri
Me.OrderByOn = True
End Sub

merci d'avance pour votre aide je continue a chercher pour autre solution