qmohamed
Messages postés16Date d'inscriptionmercredi 11 mars 2009StatutMembreDernière intervention24 mai 2009
-
23 mai 2009 à 20:29
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
24 mai 2009 à 10:15
Bonjour,
j ai créé un bouton cmdChg pour modifier les données dans une base de données access. voila le code :
(
Private Sub cmdChg_Click()
' Déclaration des variables
Dim strTable, strSQL As String
Dim intCode As Integer
Dim strNom As String
' Correction des chaines avec apostrophes éventuels
' Note : les apostrophes, dans les requêtes SQL, peuvent provoquer des erreurs
strNom = Replace(strNom, "'", "''")
'----------------------------------------------------------------------
strTable = "Adresses"
'======================================================================
' MODIFIE LES DONNEES DANS LA TABLE
'----------------------------------------------------------------------
' Requête SQL de modification ( modulable selon les valeurs saisies ou pas )
strSQL = "UPDATE " & strTable & " SET "
strSQL = strSQL & "Nom='" & strNom & "'"
If Trim(txtCP.Text) <> "" Then strSQL = strSQL & ",CP='" & Trim(txtCP.Text) & "'"
strSQL = strSQL & ",mDate='" & strDate & "'"
strSQL = strSQL & " WHERE [Code]=" & intCode & " "
' Exécute la requête d'ajout des données dans la table
db.Execute (strSQL)
' On ré-initialise la liste déroulante
ReadCboDatas
End Sub
)
Mais une fois que j 'exécute, le programme s'arrete à la ligne db.execute (strSQL) an affichant le message suivant :
erreur d'execution 91
variable objet ou variable code With non défini
je veux avoir vos réponces et merci d'avance.
qmohamed
Messages postés16Date d'inscriptionmercredi 11 mars 2009StatutMembreDernière intervention24 mai 2009 24 mai 2009 à 00:01
Bonsoir,
je pense que c est pas ca l'erreur parce que ca fonctionne dans un autre programme sans faire ce que vous venez de dire.db est défini comme ca (db as database).
j aime bien avoir votre avis
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 24 mai 2009 à 10:15
salut,
db as new database (comme l'indique
[../auteur/MAYZZ/85589.aspx Mayzz]
)
de plus db doit être connecté
enfin tu gagnerais en rapidité et surtout en fiabilité en passant par ADO (et non DAO comme çà semble être le cas actuellement)
quelques exemples simples disponibles sur www.codyx.org
++
<hr size="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp