Bonjour,
1) j'ai tapé le code suivant :
Mais le débogeur s'arrete à la ligne en rouge et m'affiche le message suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Dim str As String If rst.State <> adStateClosed Then rst.Close str = " SELECT * FROM demande where mat_d = '" & Text1.Text & "'" rst.Source = str rst.Open
Erreur d'exécution '3709'
impossible d'utiliser cette connexion pour effectuer cette opération. Elle est fermée ou non valide dans ce contexte.
Pourtant j'ai utilisé ce code ailleurs et ça marchait. Je ne comprends pourquoi j'ai cette erreur.
2) sur une autre feuille quand j'essaye d'inserer un nombre décimale dans ma base de donnée (access) j'ai le message d'erreur suivant :
Erreur d'exécution '-2147217913(800e07)'
Type de données incompatible dans l'expression du critère
Pourtant le champ qui recoit cet enregistrement est defini à Numérique et réel double, je comprends pas également.
Merci d'avance pour votre aide.
Partager