Bonjour,

J'ai un formulaire de 14 textbox et j'ai un bouton dans lequel si je clique, le contenu de tous les textbox va être envoyé vers ma base SQL.
mais à l'exécution et après le chargement des textbox avec des valeurs bien vérifié de coté type donné,parfois les données sont envoyé parfaitement et parfois le vb m'affiche l'erreur suivant:
String or binary data would be truncated.The statement has been terminated
sur cette ligne: cmd.ExecuteNonQuery()
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
 
Imports System.Data.SqlClient
 
Public Class ajoutclient
 
    Private con As New SqlConnection("Data Source=MTIRI-PC; Initial Catalog=base-ets-mtiri;integrated security=true; ")
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        con.Open() ' ouverture de la connexion vers la base
        Dim cmd As New SqlCommand("INSERT INTO CLIENT(CODAUX,NOMSOC,MATFISC,ADRESSE,CODPOST,TEL,GSM,FAX,EXON,ASSUJETTI,CATCLI,VILLE,PAYS,REMISE) VALUES(@parm1,@parm2,@parm3,@parm4,@parm5,@parm6,@parm7,@parm8,@parm9,@parm10,@parm11,@parm12,@parm13,@parm14)", con) ' la commande
        cmd.Parameters.Add("@parm1", SqlDbType.VarChar).Value = codeclient.Text
        cmd.Parameters.Add("@parm2", SqlDbType.VarChar).Value = nom.Text
        cmd.Parameters.Add("@parm3", SqlDbType.VarChar).Value = mat.Text
        cmd.Parameters.Add("@parm4", SqlDbType.VarChar).Value = adr.Text
        cmd.Parameters.Add("@parm5", SqlDbType.VarChar).Value = cpost.Text
        cmd.Parameters.Add("@parm6", SqlDbType.VarChar).Value = tel.Text
        cmd.Parameters.Add("@parm7", SqlDbType.VarChar).Value = gsm.Text
        cmd.Parameters.Add("@parm8", SqlDbType.VarChar).Value = fax.Text
        cmd.Parameters.Add("@parm9", SqlDbType.VarChar).Value = exo.Text
        cmd.Parameters.Add("@parm10", SqlDbType.VarChar).Value = ass.Text
        cmd.Parameters.Add("@parm11", SqlDbType.VarChar).Value = catégorie.Text
        cmd.Parameters.Add("@parm12", SqlDbType.VarChar).Value = ville.Text
        cmd.Parameters.Add("@parm13", SqlDbType.VarChar).Value = pays.Text
        cmd.Parameters.Add("@parm14", SqlDbType.VarChar).Value = remise.Text
        cmd.ExecuteNonQuery()
        con.Close()
    End Sub
end class
Merci