les amis,
j'ai écrit le code suivant sur l'événement Sur_click d'un bouton de commande:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim rdd As Recordset
Dim cnnx As New ADODB.Connection
cnnx.Provider = "Microsoft.Jet.OLEDB.4.0"
cnnx.ConnectionString = App.Path & "\bdFlash97.mdb"
cnnx.Open

rdd.Open "SELECT * FROM TblFichier;", cnnx
rdd.Find "nomFichier=" & CStr(Text2.Text)
If Not (rdd.EOF Or rdd.BOF) Then
If  MsgBox("Ce fichier est déjà chargé, voulez-vous continuer?", vbYesNo) = vbNo Then	
Exit Sub
End If
End If
pour me faire une recherche de nom de fichier dans la table TblFichier.
Le débogueur s'arrête sur la ligne en gras avec l'erreur 91 :"Variable objet ou variable bloc with non définie".
Franchement, je ne comprends pas le problème; Veuillez m'aider SVP.Merci