Discussion :

[dubidon]

Bonjour a tous, voila comme certain on put le voir, je travail sur un prog en vb.net dont je ne suis pas expert, et je rencontre un nouveau problème.

J'aimerais insérer dans une base de donnée sql server 2005 express un entier de plus de 10 chiffres (15 exactement), mais à chaque fois j'ai un message d'erreur "Echec de la conversion de la valeur d'un paramètre d'un double en int32"

Je précise que j'obtiens ce message à partir de 11 entiers et que si j'en met que 10, l'insertion fonctionne.
Au début j'ai pensé à une limitation de sql server, mais quand je fais l'essai de ma requete directement dans sql server tout se passe très bien et je peut insérer mes 15 chiffres.

Pour mon insertion j'utilise une requête paramétré dont voici 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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
 
        Dim command As SqlCommand = New SqlCommand("Insert into INTERVENANTE  " & _
                    "(NomInt, PrenomInt, AdresseInt, CPInt, VilleInt, TelFixeInt, TelPortInt, SecuSocialeInt )" & _
                    "VALUES " & _
                    "(@nom , @prenom, @adresse, @cp, @ville, @tel, @portable, @secu)")
 
 
        'on affecte aux paramètres de la requète les données à insérer
        command.Parameters.Add(New SqlParameter("@nom", SqlDbType.Text, 50))
        command.Parameters("@nom").Value = TXTnomnvint.Text
 
        command.Parameters.Add(New SqlParameter("@prenom", SqlDbType.Text, 50))
        command.Parameters("@prenom").Value = TXTprenomnvint.Text
 
        command.Parameters.Add(New SqlParameter("@adresse", SqlDbType.Text, 50))
        command.Parameters("@adresse").Value = TXTadrnvint.Text
 
        command.Parameters.Add(New SqlParameter("@cp", SqlDbType.Int, 6))
        command.Parameters("@cp").Value = Int(Val(TXTcpnvint.Text))
 
        command.Parameters.Add(New SqlParameter("@ville", SqlDbType.Text, 30))
        command.Parameters("@ville").Value = TXTvillenvint.Text
 
        command.Parameters.Add(New SqlParameter("@tel", SqlDbType.Int, 10))
        command.Parameters("@tel").Value = Int(Val(TXTtelnvint.Text))
 
        command.Parameters.Add(New SqlParameter("@portable", SqlDbType.Int, 10))
        command.Parameters("@portable").Value = Int(Val(TXTportnvint.Text))
 
        command.Parameters.Add(New SqlParameter("@secu", SqlDbType.Int, 15))
        command.Parameters("@secu").Value = Int(Val(TXTsecunvint.Text))
 
 
BD.ExecuterRequetecommand(command)

voici le code pour l'éxécution de la requète :

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
17
18
19
20
21
22
 
    Public Sub ExecuterRequetecommand(ByVal command As SqlCommand)
 
 
        Try
            'on crèe une connection
            objetconnection = New SqlConnection
            'on donne à la propriété ConnectionString les paramètres de connexion
            objetconnection.ConnectionString = strConn
            'on ouvre la connexion
            objetconnection.Open()
            'on execute la requete contenu par l'objet command 
            command.Connection = objetconnection
            command.ExecuteNonQuery()
            'Catch ex As Exception
            'Throw ex
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        Finally
            If Not (ObjetConnection Is Nothing) Then ObjetConnection.Close()
        End Try
    End Sub

merci pour votre aide

@++
dubidon

[SaumonAgile]

ça vient peut-être de cette ligne où tu définis la taille de la valeur à 10

Code :

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

command.Parameters.Add(New SqlParameter("@tel", SqlDbType.Int, 10))

[dubidon]

merci saumonagile pour ton aide, mais j'ai oublié de préciser que c'est pour le numero de sécu etq ue lui il est bien défini a 15.

Pour le numéro de tel tout fonctionne nikel puisque les numéros en france sont limités à 10 chiffres.

Je précise aussi que j'ai testé plusieurs type dans ma base ( int, smallint, float, numeric, real)

@++
dubidon

[SaumonAgile]

C'est peut-être la conversion en Int qui pose problème parce que la valeur est trop grande :
Essaie de convertir en Int64 avant d'affecter la valeur plutot qu'en Int. Essaie de remplacer :

Code :

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

Int(Val(TXTsecunvint.Text))

Est ce qu'il n'existe pas un truc du genre

Code :

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

Int64(Val(...))

[dubidon]

là il me sort une erreur des la compilation :
"Int64 est un type et ne peut pas être utilisé en tant qu'expression"

du cou je peut même pas éxécuter, mais je viens de réussir à faire l'insertion.

Il me disait qu'il ne pouvait pas convertir un double en int32, du cou dans ma base j'ai configuré en float au lieu de integer, et j'ai mis çà dans mon code

Code :

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

1
2
3
 
command.Parameters.Add(New SqlParameter("@secu", SqlDbType.Float, 15))
command.Parameters("@secu").Value = TXTsecunvint.Text

et là çà passe.


Encore merci saumonagile pour ton aide et ta patience, si je pouvais je te ferais de gros bisous

@++
dubidon

[SaumonAgile]

Si tu es une demoiselle, il y a moyen de s'arranger, sinon, je ferais comme si j'avais pas lu cette dernière remarque

[dubidon]

bah pour être une demoiselle y'aurait fallu que j'ai plus de sein et un changement de sexe, mais rassure toi je l'envisage absolument ce type de changement je suis très bien ainsi

@++
dubidon