A voir également:
- Erreur dans la syntax update en vb.net
- Erreur 0x80070643 - Accueil - Windows
- Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
- Windows update bloqué - Guide
- Asus live update - Télécharger - Utilitaires
- Winget update - Guide
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