Discussion :

[SISGI]

Bonsoir,
j'ai un problème en conversion de type varchar en float
mon problème c'est que lorsque je récupère les données saisies par l'utilisateur je les insère dans la base données mais tjor il m'affiche un msg d'erreur

Erreur de conversion du type de données varchar en float.

même si que j'ai converti le champ(note ) entré par l'utilisateur
voilà mon code

Code :

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

1
2
3
4
5
6
7
8
9
  If IsNumeric(Me.textnote.Text) Then
 
            Dim nt As Single = CType(Me.textnote.Text, Single)
            cmd.CommandText = "insert into notes(note,eleve,niveau,classe,matiere) values('" & nt & "','" & Me.listeleve.SelectedValue & "','" & Me.ListeNiveau.SelectedValue & "','" & Me.listeclasse.SelectedValue & "' ,'" & Me.listematiere.SelectedValue & "' )"
            cmd.Connection = con
            cmd.ExecuteNonQuery()
        Else
            MsgBox("Vous devez entrer un numérique")
        End If

merciii de m'aider

[hugoclo]

Dans votre base comment est déclaré la colonne 'note'?

[SISGI]

le champ note dans la base de donnée est en float

[Pol63]

il ne faut pas de ' autour de nt
' signifie string

[SISGI]

mercii bc pour votre réponse mais j'ai pas bien compris

[azstar]

Code :

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

1
2
3
4
5
6
7
8
9
10
 
If IsNumeric(Me.textnote.Text) Then
 
            Dim nt As Single = CType(Me.textnote.Text, Single)
            cmd.CommandText = "insert into notes(note,eleve,niveau,classe,matiere) values(" & nt & ",'" & Me.listeleve.SelectedValue & "','" & Me.ListeNiveau.SelectedValue & "','" & Me.listeclasse.SelectedValue & "' ,'" & Me.listematiere.SelectedValue & "' )"
            cmd.Connection = con
            cmd.ExecuteNonQuery()
        Else
            MsgBox("Vous devez entrer un numérique")
        End If

[SISGI]

c'est le même code que j'ai écrit je crois

[azstar]

c'est le même code que j'ai écrit je crois

Code :

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

1
2
3
 
 cmd.CommandText = "insert into notes(note,eleve,niveau,classe,matiere) values(" & nt & ",'" & Me.listeleve.SelectedValue & "','" & Me.ListeNiveau.SelectedValue & "','" & Me.listeclasse.SelectedValue & "' ,'" & Me.listematiere.SelectedValue & "' )"
            cmd.Connection = con

dans une requête sql et pour les float,int il ne faut pas ajouter les '

ce que tu a

Code :

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

1
2
 
... values('" & nt & "',...

ce que faut faire

Code :

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

1
2
 
... values(" & nt & ",...

[SISGI]

oui je l'ai changé mais il m'affiche une autre erreur

Erreur du serveur dans l'application '/projetecole'.
Il y a moins de colonnes dans l'instruction INSERT que de valeurs spécifiées dans la clause VALUES. Le nombre de valeurs de la clause VALUES doit être le même que le nombre de colonnes de l'instruction INSERT.

ce problème je le rencontre seulement lorsque j'insère un nombre avec virgule

[Pol63]

prends des cours avant de coder, parce que là on va y passer 3 semaines pour que 3 malheureuses lignes de code fonctionnent ...

http://plasserre.developpez.com/cours/vb-net/

[SISGI]

et voilà même sur ce forum j'ai pas trouvé la solution de mon problème de tt façon merci pour vos réponses ^^

[azstar]

tu peux faire

Code :

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

1
2
3
4
5
6
7
8
9
10
 
 cmd.CommandType =CommandType.Text
            cmd.CommandText = "insert into notes(note,eleve,niveau,classe,matiere) values(@note,@eleve,@niveau,@classe,@matiere)"
             cmd.Parameters.Add("@note", SqlDbType.float, "note").Value = nt;
             cmd.Parameters.Add("@eleve", SqlDbType.NVarChar, 25, "eleve").Value =Me.listeleve.SelectedValue
             cmd.Parameters.Add("@niveau", SqlDbType.NVarChar, 25, "niveau").Value = Me.ListeNiveau.SelectedValue
             cmd.Parameters.Add("@classe", SqlDbType.NVarChar, 25, "classe").Value = Me.listeclasse.SelectedValue 
            cmd.Parameters.Add("@matiere", SqlDbType.NVarChar, 25, "matiere").Value = Me.listematiere.SelectedValue
            cmd.Connection = con
            cmd.ExecuteNonQuery()

et le 25 et la taille de tes champs dans la base de données

[SISGI]

merciiiiii bc Abdo azstar pour votre réponse ça marche trèèèèèèèèèès bien, et j'oublie pas de te remercie Mr Pol63 pour ton conseil ^^

[azstar]

merci de cliquer sur