Requete sql pour access via visual basic
Bonjour,
j'essaie d'inserer des elements dans une base de données.
Mais j'ai constemment des messages d'erreures.
Voyez vous ce qui cloche dans mon code? et pouvez vous m'aider à comprendre cette erreure.
Je vous remercie de tout coeur car je bloque depuis quelques longues heures.
Sub sqll()
Dim vSQL As String
Dim vDossier As String
vDossier = "G:\bases de données\"
vSource = "ere.mdb"
vTable = "tache"
vBaseDeDonnées.Open "provider=microsoft.jet.oledb.4.0;" & "persist security info=false;" & "data source=" & vDossier & vSource
vSQL = " INSERT INTO taches " _
& "(taches, pourle, ordre,rappel) VALUES " _
& "('enfin', '11/09/2005', '8','oui');"
vDonnées.Open vSQL, vBaseDeDonnées, adOpenStatic, adLockReadOnly
end sub
j'essaie d'inserer des elements dans une base de données.
Mais j'ai constemment des messages d'erreures.
Voyez vous ce qui cloche dans mon code? et pouvez vous m'aider à comprendre cette erreure.
Je vous remercie de tout coeur car je bloque depuis quelques longues heures.
Sub sqll()
Dim vSQL As String
Dim vDossier As String
vDossier = "G:\bases de données\"
vSource = "ere.mdb"
vTable = "tache"
vBaseDeDonnées.Open "provider=microsoft.jet.oledb.4.0;" & "persist security info=false;" & "data source=" & vDossier & vSource
vSQL = " INSERT INTO taches " _
& "(taches, pourle, ordre,rappel) VALUES " _
& "('enfin', '11/09/2005', '8','oui');"
vDonnées.Open vSQL, vBaseDeDonnées, adOpenStatic, adLockReadOnly
end sub
2 réponses
-
j'ai enlevé le code " adLockReadOnly" mais ça ne fonctionne pas mieux.
Une aide m'est vraiment utile.
Merci -
Si ça peut vous aider, voici le message d'erreur.
Type de données incompatible dans l'expression du critère.
et mon débogeur surligne la ligne:
vDonnées.Open vSQL, vBaseDeDonnées, adOpenStatic, adLockReadOnly
et encore merci à tous ceux qui prennent de leur temp pour m'aider.
