Problème d'ajout

Résolu/Fermé
bouchrot Messages postés 352 Date d'inscription mercredi 12 octobre 2011 Statut Membre Dernière intervention 2 janvier 2023 - Modifié par baladur13 le 14/11/2016 à 13:23
bouchrot Messages postés 352 Date d'inscription mercredi 12 octobre 2011 Statut Membre Dernière intervention 2 janvier 2023 - 23 déc. 2016 à 12:46
Bonjour,

salut , j'ai un problème pour ajouter des données sur access a partir de vb
voici mon code :
 If txtn.Text = "" Then
            MsgBox("veuillez saisir le nom d'outil à supprimer", 1 + 32, "Attention")
        ElseIf MsgBox("vous vous vraiment supprimer ", 1 + 32, "Attention") = MsgBoxResult.Ok Then
            cnx.Open()
            cmd.CommandType = CommandType.Text
            cmd.CommandText = "delete from consommables where N° = '" & txtn.Text & "'"
            cmd.Connection = cnx
            cmd.ExecuteNonQuery()
            MsgBox("l'outil est supprimer")
            vider()
            DataGridView1.Refresh()
        End If
        cnx.Close() 

lorsque je clique sur le bouton ajouter , il m'affiche un message disant type dedonnées incompatible dans l'expression du critère


EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.

2 réponses

yg_be Messages postés 23309 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 2 novembre 2024 Ambassadeur 1 551
19 nov. 2016 à 22:38
C'est le code de ton bouton "ajouter"?
Quel est le type de N°? C'est bien une chaîne de caractères?
0
bouchrot Messages postés 352 Date d'inscription mercredi 12 octobre 2011 Statut Membre Dernière intervention 2 janvier 2023 6
22 nov. 2016 à 17:35
oui cest bien mon code ,le type de N° est autonumerique , et c'est la clé primaire
0
yg_be Messages postés 23309 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 2 novembre 2024 1 551
22 nov. 2016 à 19:19
Si N° est un nombre et pas un texte, essaie :
cmd.CommandText = "delete from consommables where N° = " & txtn.Text 
0
bouchrot Messages postés 352 Date d'inscription mercredi 12 octobre 2011 Statut Membre Dernière intervention 2 janvier 2023 6
23 déc. 2016 à 12:46
merci
0