Problèmes erreurs d'execution
bruce207
Messages postés
106
Date d'inscription
mardi 4 mars 2008
Statut
Membre
Dernière intervention
2 mai 2012
-
19 avril 2008 à 17:07
bruce207 Messages postés 106 Date d'inscription mardi 4 mars 2008 Statut Membre Dernière intervention 2 mai 2012 - 19 avril 2008 à 17:20
bruce207 Messages postés 106 Date d'inscription mardi 4 mars 2008 Statut Membre Dernière intervention 2 mai 2012 - 19 avril 2008 à 17:20
A voir également:
- Problèmes erreurs d'execution
- Erreur d'exécution 424 ✓ - Forum Visual Basic
- Erreur 424 "Objet requis" ✓ - Forum Visual Basic 6
- Message d'erreur 424: objet requis ✓ - Forum VBA Office (Excel, Word ...)
- Erreur d'execution 9 ✓ - Forum Visual Basic 6
- Macro envoi de mail : "Erreur 424 : Objet requis" - Forum VBA Office (Excel, Word ...)
1 réponse
bruce207
Messages postés
106
Date d'inscription
mardi 4 mars 2008
Statut
Membre
Dernière intervention
2 mai 2012
19 avril 2008 à 17:20
19 avril 2008 à 17:20
Bonjour,
1) j'ai tapé le code suivant :
Code :
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
Mais le débogeur s'arrete à la dernière ligne rst.Open et m'affiche le message suivant :
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.
1) j'ai tapé le code suivant :
Code :
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
Mais le débogeur s'arrete à la dernière ligne rst.Open et m'affiche le message suivant :
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.