Codage vb6.0
Utilisateur anonyme -
Bjr à tous.
suis entrain de code sur vb6.0
après avoir lié l'application à la base de données, à chaque fois que je tente d'enregistrer les données, je recois un message d'erreur comme suit:
"Erreur de connexion: Erreur de syntaxe dans l'instruction INSERT INTO".
je refais les codes plusieurs fois mais rien ne change.
voici les codes que j'ai placés:
Private Sub CmdEnr_Click()
Dim conn As ADODB.Connection
Dim cmd As ADODB.Command
Dim dbPath As String
dbPath = "E:\Projets tutores 2024\Projet Monsengo\Syst\Gecre.mdb"
Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & dbPath & ";"
On Error GoTo ConnectionError
conn.Open
Set cmd = New ADODB.Command
cmd.ActiveConnection = conn
cmd.CommandText = "INSERT INTO FORMULAIRE (Numero, Date, Nomclient, Postnomclient, Sexe, Adresse, Datenais, Lieunais, Fonction, Typecre, Montcre, Echeance) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 7, Text1.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 10, Text2.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 15, Text3.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 30, Text4.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 1, Combo1.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 60, Text5.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 10, Text6.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 15, Text7.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 20, Text8.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 35, Combo2.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 15, Text9.Text)
cmd.Parameters.Append cmd.CreateParameter(, adVarChar, , 30, Text10.Text)
cmd.Execute
MsgBox "Formulaire Enregistré dans la base de données avec succès !"
conn.Close
Exit Sub
ConnectionError:
MsgBox "Erreur de connexion : " & Err.Description
End Sub
si vous pouvez m'aider, de l'aide svp
aidez moi
- Fichier word illisible codage
- Fichier bin - Guide
- Word 2013 - Télécharger - Traitement de texte
- Fichier epub - Guide
- Fichier rar - Guide
- Tableau word - Guide
2 réponses
bonjour, à quelle ligne de code obtiens-tu ce message d'erreur?
Je pense que tu dois travailler afin de découvrir, parmis tes 12 paramètres, lequel pose problème.
Si je devais faire ce travail, moi j'essaierais de les remplacer tous par des constantes, et puis, un un, de les remplacer chacun par un champ variable.
Bonjour,
Date est un mot réservé, cette fonction permet d'obtenir la date du jour.
Si tu défi un champ avec le nom d'un mot réservé il faut [l'encadré] par des [crochets].
Personnellement [j'encadre] tous mes champ.
Du reste ton message d'erreur est équivoque, il précise qu'il s'agit d'une erreur de connexion alors qu'il s'agit d'une erreur de syntaxe dans ta requête lié au mot réservé Date. Erreur de connexion et/ou requête