Discussion :

[marie-anne]

Bonsoir,
je suis entrain de développer une petite application pour la gestion des créances des clients d'une société mais lors de l'execuètion une erreur s'affiche auè niveau de la requete SQL

L'exception invalidcast n'a pas ete geree

voila le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
    Private Sub but_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles but.Click
 
        If IsNumeric(debit.Text & Credit.Text) Then
            Dim i As Double
            i = Val(debit.Text) + Val(Credit.Text)
            Dim classConnex As New ParamConnexion3
            Dim cmdString As String = "UPDATE Client SET Nom ='" & ListBox1.SelectedItem & "' ,Debit ='" & debit.Text & "' ,Credit='" & Credit.Text & "',Total='" & i & "' WHERE Nom='" & ListBox1.SelectedItem & "'"
            Dim SQLCommand As New OleDbCommand(cmdString, classConnex.Connection)
            SQLCommand.ExecuteNonQuery()
            debit.Clear()
            Credit.Clear()
            MsgBox("mise a jour reussie")
        Else
            MsgBox(" debit et credit doivent etre une valeur numerique")
        End If
    End Sub

je vouès remercie infiniment de votre aide

[alex_vino]

N'utilise pas "ListBox1.SelectedItem", utilise plutot ".ToString()" a la fin.
Utilise des "Try...Catch" et n'oublie pas de fermer la connexion a ta base de données dans le "Finally".

N'utilise pas "debit.Text", j'image que "debit" est une TextBox. Donc renomme ta TextBox en "txtDebit", il en va de meme pour les autres composants. Ensuite:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim debit, credit as Double
If Integer.TryCast(txtDebit.Text, debit) is Nothing Or Integer.TryCast(txtCredit.Text, credit) is Nothing)
MessageBox.Show(" debit et credit doivent etre une valeur numerique")
Return
End If
'...

Corrige tout ca et dit nous si tu as toujours une erreur, si oui, quelle ligne elle se situe.

Bon courage

[marie-anne]

N'utilise pas "ListBox1.SelectedItem", utilise plutot ".ToString()" a la fin.
Utilise des "Try...Catch" et n'oublie pas de fermer la connexion a ta base de données dans le "Finally".

N'utilise pas "debit.Text", j'image que "debit" est une TextBox. Donc renomme ta TextBox en "txtDebit", il en va de meme pour les autres composants. Ensuite:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim debit, credit as Double
If Integer.TryCast(txtDebit.Text, debit) is Nothing Or Integer.TryCast(txtCredit.Text, credit) is Nothing)
MessageBox.Show(" debit et credit doivent etre une valeur numerique")
Return
End If
'...

Bonsoir
Merci de ton aide, jai rennomm txt debit et txt credit mais pour le try catch je ne sais pas comment les utiliser, je suis nulle en VB
de toute facon ca m affiche toujours la meme erreur

L'opérateur '&' n'est pas défini pour chaîne "UPDATE Client SET Nom ='System.D" et type 'DataRowView'.

je ne sais plus quoi faire

[Pol63]

pour intercepter une erreur qu'elle soit déclenchée depuis .net ou sql server il faut un try catch

tu dis faire un logiciel pour une entreprise, mais ton code n'a pas l'air très pro ... j'espère pour l'entreprise que tu es en formation et que le code va être vérifié ...
pour le détail :
voir DbParameters
ce isnumeric sur une concaténation me semble étrange, avec 2 décimaux ca ne conviendra pas)
SelectedItem n'est pas un string et ne peut être concaténé avec un bon paramétrage de vb

[marie-anne]

pour intercepter une erreur qu'elle soit déclenchée depuis .net ou sql server il faut un try catch

tu dis faire un logiciel pour une entreprise, mais ton code n'a pas l'air très pro ... j'espère pour l'entreprise que tu es en formation et que le code va être vérifié ...
pour le détail :
voir DbParameters
ce isnumeric sur une concaténation me semble étrange, avec 2 décimaux ca ne conviendra pas)
SelectedItem n'est pas un string et ne peut être concaténé avec un bon paramétrage de vb

Oui effectivement, je suis une responsable commerciale dans une société mais j'essaye de développer ce logiciel pour des raisons personnelles et je compte sur votre aide pour avancer
Merci sebastien

[Pol63]

visiblement tu as mis des datarowview dans un listbox, et donc concaténer le selecteditem n'est pas possible simplement
à mon avis tu tapes un peu au pif donc ca ne va pas etre simple de t'aider sans le code

[alex_vino]

Jette un coup d'oeil ici dans un 1er temps : http://plasserre.developpez.com/cours/vb-net/

Applique au moins les bases car il y a trop a "défricher" dans ton code pour le moment

As-tu ajouté des ToString() a toutes tes variables dans ta requete SQL? et modifier tout le reste que je t'ai dit?

PS: Quand tu auras résolu cela tu auras une autre erreur du genre "La connexion est déja ouverte", il te faudra alors fermer SQLCommand apres la ligne SQLCommand.ExecuteNonQuery() (ou dans ton Finally si tu utilise des Try...Catch, mais tu dois utiliser Try...Catch si tu veux éviter d'autres erreurs)

[sinople]

Commencer par utiliser des requêtes paramétrées serait déjà un bon début plutôt que la requête générée à la main qui va planter au premier apostrophe !