Erreur

Signaler
Messages postés
4
Date d'inscription
vendredi 16 avril 2010
Statut
Membre
Dernière intervention
9 mai 2010
-
Messages postés
4
Date d'inscription
vendredi 16 avril 2010
Statut
Membre
Dernière intervention
9 mai 2010
-
salut
j'ai fais un projet en VB.net;il s'agit d'un formulaire.En cliquant sur un bouton il enregistre les données dans la base de données..j'ai fais tout mais en cliquant sur le bouton pour envoyer les données il m'affiche une erreur au niveau du ligne dta.UPDATE(dts,"base") erreur de syntaxe dans l'instruction INSERT INTO
qu'est ce je dois faire??
Merci d'avance

3 réponses

Messages postés
147
Date d'inscription
mercredi 18 septembre 2002
Statut
Membre
Dernière intervention
15 avril 2011

Salut,
et bien je pense que publier la fonction concernée serai un bon début.

Cordialement,
S Nikator
Messages postés
114
Date d'inscription
lundi 15 avril 2002
Statut
Membre
Dernière intervention
1 juillet 2011

Bonjour,

Est ce que vous avez créé votre insert command dans votre dataadapter ?
DataAdapter.InsertCommand = lComdBuilder.GetInsertCommand

Cordialement
Sébastien

Développement Rapide PHP / VBNET -> www.database2code.com
Messages postés
4
Date d'inscription
vendredi 16 avril 2010
Statut
Membre
Dernière intervention
9 mai 2010

Private Sub envoyer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles envoyer.Click
dtr = dts.Tables("visa").NewRow
dtr("nom") = Me.TextBox1.Text
dtr("prénom") = Me.TextBox2.Text
dtr("nationalité actuel") = Me.TextBox3.Text
dtr("nationalité d'origine") = Me.TextBox3.Text
dtr("tél") = Me.TextBox5.Text
dtr("profession") = Me.TextBox6.Text
dtr("adresse") = Me.RichTextBox1.Text
dtr("numéro document") = Me.TextBox10.Text
dtr("natio document") = Me.TextBox11.Text
If RadioButton1.Checked = True Then
dtr("sex") = Me.RadioButton1.Text
Else : dtr("sex") = Me.RadioButton2.Text
End If
If RadioButton4.Checked = True Then
dtr("situation familial") = Me.RadioButton4.Text
ElseIf RadioButton5.Checked = True Then
dtr("situation familial") = Me.RadioButton5.Text
ElseIf RadioButton6.Checked = True Then
dtr("situation familial") = Me.RadioButton6.Text
Else : dtr("situation familial") = Me.RadioButton7.Text
End If
If ComboBox1.Text = "Autre" Then
dtr("nature document voyage") = Me.TextBox9.Text
Else : dtr("nature document voyage") = Me.ComboBox1.Text
End If
dtr("pays naissance") = Me.ComboBox3.Text
If ComboBox2.Text = "Autre" Then
dtr("motif visa") = Me.RichTextBox2.Text
Else : dtr("motif visa") = Me.ComboBox2.Text
End If
dtr("durée visa") = Me.NumericUpDown10.Text
dtr("date naissance") = Me.NumericUpDown7.Text & " \ " & Me.NumericUpDown8.Text & " \ " & Me.NumericUpDown9.Text
dts.Tables("visa").Rows.Add(dtr)
cmdb = New OleDbCommandBuilder(dta)

dta.Update(dts, "visa")
dts.Clear()
dta.Fill(dts, "visa")
dtt = dts.Tables("visa")

End Sub


l'erreur et au niveau dta.update(dts, "visa")
"erreur de syntaxe dans l'instruction INSERT INTO "
je trouve pas la solution!!