Probleme d'insertion dans la base

Bonjour,

J'ai essayé d'inserer des valeurs dans la base mas je rencontre souvent le probleme de conversion de données voici le code

Code:

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
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
 
Imports System.String
Imports System.Data.SqlClient
Partial Public Class nouveau
 
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 
    End Sub
 
    Protected Sub Enregistr_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Enregistr.Click
        ' Dim numrD As String = NumD.Text
        'Dim consist As String = Consis.Text
        'Dim nomOpera As String = nomOpr.Text
        'Dim situa As String = Situation.Text
        'Dim typCom As String = TypeComm.Text
        'Dim typePro As String = TypeProjet.Text
        'Dim numrEnvoiComm As String = NumeroAnvoi.Text
        'Dim NumAriv As String = NumerArriv.Text
        'Dim DateEnvoiCom As String = Date.Parse(DateEnvoi.Text)
        'Dim DateArivvAgence As String = DateArrivAg.Text
        'Dim Observ As String = Observation.Text
        'Dim petition As String = Petitionnaire.Text
        'Dim ArList As String = ArchiList.SelectedValue
        'Dim TpList As String = TopoList.SelectedValue
        'Dim reff As String = Ref.Text
        'Dim dateCom As String = DateComm.Text
 
        Dim myConnection As SqlConnection
        Dim myCommand1 As SqlCommand
        Dim myReader1 As SqlDataReader
        Dim Sql1 As String
 
        Sql1 = "INSERT INTO [dossier] ([num_dossier], [num_envoi_commune], [num_arrivee_agence], [date_arrivee_agence],[date_envoi_commun], [observation], [petitionaire], [id_commune], [code_projet], [reference_fonciere], [id_topographe], [id_Archetecte], [nom_operation], [date_comm], [situation], [Consistance],[type_commission]) VALUES(@num_dossier, @num_envoi_commune, @num_arrivee_agence, @date_arrivee_agence,@date_envoi_commun, @observation, @petitionaire,@id_commune, @code_projet, @reference_fonciere, @id_topographe, @id_Archetecte,@nom_operation, @date_comm, @situation, @Consistance,@type_commission)"
 
        myConnection = CType(Session("myConnection"), SqlConnection)
        myCommand1 = New SqlCommand(Sql1, myConnection)
        myCommand1.Parameters.AddWithValue("@num_dossier", NumD.Text)
        myCommand1.Parameters.AddWithValue("@num_envoi_commune", NumeroAnvoi.Text)
        myCommand1.Parameters.AddWithValue("@num_arrivee_agence", NumerArriv.Text)
        myCommand1.Parameters.AddWithValue("@date_arrivee_agence", DateArrivAg.Text)
        myCommand1.Parameters.AddWithValue("@observation", Observation.Text)
        myCommand1.Parameters.AddWithValue("@petitionaire", Petitionnaire.Text)
        myCommand1.Parameters.AddWithValue("@id_commune", CommunList.Text)
        myCommand1.Parameters.AddWithValue("@code_projet", Convert.TypeProjet.Text)
        myCommand1.Parameters.AddWithValue("@id_topographe", TopoList.Text)
        myCommand1.Parameters.AddWithValue("@reference_fonciere", Ref.Text)
        myCommand1.Parameters.AddWithValue("@id_Archetecte", ArchiList.Text)
        myCommand1.Parameters.AddWithValue("@nom_operation", nomOpr.Text)
        myCommand1.Parameters.AddWithValue("@date_comm", DateComm.Text)
        myCommand1.Parameters.AddWithValue("@situation", Situation.Text)
        myCommand1.Parameters.AddWithValue("@Consistance", Consis.Text)
        myCommand1.Parameters.AddWithValue("@date_envoi_commun", DateComm.Text)
        myCommand1.Parameters.AddWithValue("@type_commission", TypeComm.Text)
 
 
 
        myReader1 = myCommand1.ExecuteReader()
 
        'DataSource = myReader1
        'List1.DataTextField = "nom_region"
        'List1.DataValueField = "id_region"
        'List1.DataBind()
        myReader1.Close()
 
    End Sub
End Class

Et voici l'erreur

Citation:

Erreur du serveur dans l'application '/'.
La conversion implicite du type de données nvarchar en varbinary n'est pas autorisée. Utilisez la fonction CONVERT pour exécuter cette requête.
Description : Une exception non gérée s'est produite au moment de l'exécution de la demande Web actuelle. Contrôlez la trace de la pile pour plus d'informations sur l'erreur et son origine dans le code.

Détails de l'exception: System.Data.SqlClient.SqlException: La conversion implicite du type de données nvarchar en varbinary n'est pas autorisée. Utilisez la fonction CONVERT pour exécuter cette requête.

Erreur source:

Ligne 56 :
Ligne 57 :
Ligne 58 : myReader1 = myCommand1.ExecuteReader()
Ligne 59 :
Ligne 60 : 'DataSource = myReader1

Fichier source : E:\projet\Gestion\Gestion\nouveau.aspx.vb Ligne : 58

Trace de la pile:

[SqlException (0x80131904): La conversion implicite du type de données nvarchar en varbinary n'est pas autorisée. Utilisez la fonction CONVERT pour exécuter cette requête.]
System.Data.SqlClient.SqlConnection.OnError(SqlException exception, Boolean breakConnection) +1951450

Est ce que je suis obliger de convertir tous les champs au bon Format identique au format de la base ou bien ya autre solution optimale pour gérer ce genre d'erreur Merci de me fournir d'aide.