A voir également:
- Erreur dans la syntax update en vb.net
- Windows update bloqué - Guide
- Erreur 1004 vba ✓ - Forum VB / VBA
- Windows update erreur 80072efe ✓ - Forum Windows 7
- Erreur 1000 france tv - Forum MacOS
- Asus live update ✓ - Forum Logiciels
1 réponse
sapma
Messages postés
168
Date d'inscription
vendredi 20 novembre 2009
Statut
Membre
Dernière intervention
7 juin 2011
5
7 juin 2011 à 12:12
7 juin 2011 à 12:12
Ajouter un point d'arrêt sur If Cmdr.ExecuteNonQuery() = 1 Then et copier ici la valeur de Cmdr
possible que c'est une erreur de textbox vide qui update un champ de table qui n'accepte pas la valeur vide ou null ...
possible que c'est une erreur de textbox vide qui update un champ de table qui n'accepte pas la valeur vide ou null ...
7 juin 2011 à 12:30
7 juin 2011 à 12:35
If TextBox6.Text = "" Or TextBox5.Text = "" Or TextBox7.Text = "" Or TextBox8.Text = "" Or ComboBox2.Text = "" Then
MsgBox("veuillez remplir les champs", MsgBoxStyle.Exclamation, "Modification de donnée")
Exit Sub
Else
Cmdr = Cn.CreateCommand()
Cmdr.CommandText = "UPDATE produit SET code_produit=" & CType(TextBox6.Text, Integer) & ",designation='" & TextBox5.Text & "',quantité=" & TextBox7.Text & ",prix_unitaire=" & TextBox8.Text & ",tva=" & ComboBox2.Text & " where (code_produit=" & CType(Me.lv.SelectedItems(0).Text, Integer) & ")"
If Cmdr.ExecuteNonQuery() = 1 Then
MsgBox("modification fait avec succeé.", MsgBoxStyle.Information, "Modification de donnée")
End If
Call affichage()
End If
l erreur dans instruction update
les champs ne sont pas vide
l operation n affecte pas à un seul champ
mais pour tous les champs ça marche bien