Problème d'exécution d'une requête
am092
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
Je veux modifier les données d'une table via le code vb suivant:
voici le message d'erreur qui s'affiche au niveau de la requête : La conversion de la chaîne "update PDR SET quantite_en_stock" en type 'Double' n'est pas valide.
sachant que le type du champ quantite_en_stock de la table PDR est numérique
Quelqu'un peut m'aider?
Merci d'avance.
EDIT: Ajout de la coloration syntaxique.
Je veux modifier les données d'une table via le code vb suivant:
n = DataGridpdr.RowCount - 1
Dim i = 0
Dim nvl_qtit As Integer
While i < n
nvl_qtit = CInt(DataGridpdr.Item(4, i).Value - DataGridpdr.Item(2, i).Value)
req = "update PDR SET quantite_en_stock= " + nvl_qtit + " where référence='" + DataGridpdr.Item(0, i).Value + "'"
cmd = New OleDbCommand(req, cn)
cmd.ExecuteNonQuery()
i = i + 1
End While
voici le message d'erreur qui s'affiche au niveau de la requête : La conversion de la chaîne "update PDR SET quantite_en_stock" en type 'Double' n'est pas valide.
sachant que le type du champ quantite_en_stock de la table PDR est numérique
Quelqu'un peut m'aider?
Merci d'avance.
EDIT: Ajout de la coloration syntaxique.
A voir également:
- Erreur d'exécution de la requete erreur inconnue
- Erreur 3005 france tv - Forum TV & Vidéo
- Freebox erreur video inconnue ✓ - Forum TV & Vidéo
- Erreur 3000 france tv - Forum Lecteurs et supports vidéo
- Iptv erreur de lecture - Forum TV & Vidéo
- Erreur t32 ✓ - Forum Livebox
1 réponse
Bonjour,
Voici comment j'écrirai le code -> Non testé
Kalissi
Voici comment j'écrirai le code -> Non testé
Dim Nbr As Int32 = 10
Dim req As String = String.Empty
Dim cmd As New System.Data.OleDb.OleDbCommand(req, Connexion)
'n = DataGridpdr.RowCount - 1
Dim iCmpt = 0
Dim nvl_qtit As Int32 = 0
While iCmpt < Nbr
nvl_qtit = (Convert.ToInt32(DataGridpdr.Item(4, iCmpt).Value) - Convert.ToInt32(DataGridpdr.Item(2, iCmpt).Value))
req = String.Concat("update PDR SET quantite_en_stock= ", nvl_qtit, " where référence='", DataGridpdr.Item(0, iCmpt).Value, "'")
cmd = New OleDbCommand(req, Connexion)
cmd.ExecuteNonQuery()
iCmpt += 1
End While
Kalissi
Utilisateur anonyme
EDIT: Précision du langage dans la coloration syntaxique.