Erreur de synthaxe dans l'instruction INSERT INTO

Delivel - 16 sept. 2016 à 13:03 - Dernière réponse :  Delivel
- 23 sept. 2016 à 16:07
Bonjour,
Merci beaucoup pour votre aide Mr.Jordane ça marche bien le bouton modifier. Mais j'ai des problème sur le bouton ajouter un enregistrement car il y a unr erreur de syntaxte au niveau de ObjetDataAdapter.Update(ObjetDataSet, "NomPatient")
svp je solicite votre aide merci!
Afficher la suite 

3 réponses

Répondre au sujet
jordane45 20581 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 23 avril 2018 Dernière intervention - 16 sept. 2016 à 13:42
0
Utile
Vu que tu as ouvert une nouvelle discussion ... merci d'y remettre le code concerné ( en utilisant LES BALISES DE CODE )
Voir ici comment faire : http://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

Commenter la réponse de jordane45
0
Utile
Bonjour,

Si c’était le meme probleme que le mien j'ai changer l'emplacement de ma base donnée vers disque "E/", qui a été avant dans "C/" car update montre un erreur "Erreur de synthaxe dans l'instruction INSERT INTO"

et voila comment j l'ai resolu:

Private Sub Enregistrer_Click()

strConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\MABASEDONNE.accdb"
strSql = "SELECT * FROM TABLE1"
ObjetConnection = New OleDbConnection(strConn)
ObjetConnection.ConnectionString = strConn
ObjetConnection.Open()
ObjetCommand = New OleDbCommand(strSql)
ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand)
ObjetCommand.Connection() = ObjetConnection
ObjetDataAdapter.Fill(ObjetDataSet, "TABLE1")
ObjetDataTable = ObjetDataSet.Tables("TABLE1")

Try
'Creer nouvelle ligne
ObjetDataRow = ObjetDataSet.Tables("TABLE1").NewRow()
ObjetDataRow("champ1") = Me.TextBox1.Text
ObjetDataRow("champ2") = Me.TextBox2.Text
ObjetDataRow("champ3") = Me.TextBox3.Text
ObjetDataRow("champ4") = Me.ComboBox1.Text
ObjetDataSet.Tables("TABLE1").Rows.Add(ObjetDataRow)

'Modifier les valeurs changées dans le DataAdapter
ObjetCommandBuilder = New OleDbCommandBuilder(ObjetDataAdapter)

'Mise à jour
ObjetDataAdapter.Update(ObjetDataSet, "TABLE1") '// l’exception apparait ici

'On vide le DataSet et on le 'recharge' de nouveau.
ObjetDataSet.Clear()
ObjetDataAdapter.Fill(ObjetDataSet, "TABLE1")
ObjetDataTable = ObjetDataSet.Tables("TABLE1")

Catch ex As Exception
MsgBox(ex.Message)
End Try
MsgBox("Bien enregisté")

End Sub
Commenter la réponse de HD
0
Utile
Bonjour et merci de m'avoir repondu!
J'essaie et je tiens au courant merci.
Commenter la réponse de Delivel

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.