"Erreur de syntaxe dans l'instruction update" vb.net 2010
Bonjour,
mon problème que j'arrive pas à savoir ma faute syntaxique au niveau de cette requête, lors de l'exécution, il m'envoie cet erreur:
Erreur de syntaxe dans l'instruction update
requête:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| Dim check As Integer
Dim conn As New OleDbConnection
Dim oledbcom As New OleDbCommand
If MsgBox("Voulez-vous enregistrer les modifications ?", MsgBoxStyle.OkCancel, "Modifier") = MsgBoxResult.Cancel Then
Else
Try
conn = GetConnect()
conn.Open()
oledbcom = conn.CreateCommand
oledbcom.CommandText = "UPDATE Stock SET Inventaire= '" & Trim(Inv2.Text) & "', Date_d'entrée= '" & Trim(Date2.Text) & "',Fournisseur= '" & Trim(Fourn2.Text) & "',Désignation= '" & Trim(Desi2.Text) & "',Quantité= '" & Numeric2.Value & "',Lieu= '" & Trim(Lieu2.Text) & "' WHERE Inventaire= " & Trim(Label15.Text) & ""
check = oledbcom.ExecuteReader.RecordsAffected
If check > 0 Then
MsgBox("Modification avec succée", MsgBoxStyle.Information, "Modification")
Else
MsgBox("Modification échouer ", MsgBoxStyle.Information, "Modification")
End If
refresh_form()
conn.Close()
Catch ex As Exception
MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OkOnly, "Connection Erreur !!""")
End Try
End If |
