multiview radiobuttonlist et insert

**alicia26** · 05/12/2008, 19h18

bonjour à tous!
je dois concevoir une page pour effectuer une enquête auprès des internautes en vb.net
j'ai pensé à utiliser un multiview composé de plusieurs views avec des radiobuttonlist,mais au moment de l'insert il me renvoit cette erreur et j'y comprend rien!
prière de m'éclairer pour la signification

Code :

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

System.Data.SqlClient.SqlException: Les données chaîne ou binaires seront tronquées. L'instruction a été arrêtée. à System.Data.SqlClient.SqlConnection.OnError(SqlException exception, Boolean breakConnection) à System.Data.SqlClient.SqlInternalConnection.OnError(SqlException exception, Boolean breakConnection) à System.Data.SqlClient.TdsParser.ThrowExceptionAndWarning(TdsParserStateObject stateObj) à System.Data.SqlClient.TdsParser.Run(RunBehavior runBehavior, SqlCommand cmdHandler, SqlDataReader dataStream, BulkCopySimpleResultSet bulkCopyHandler, TdsParserStateObject stateObj) à System.Data.SqlClient.SqlCommand.FinishExecuteReader(SqlDataReader ds, RunBehavior runBehavior, String resetOptionsString) à System.Data.SqlClient.SqlCommand.RunExecuteReaderTds(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, Boolean async) à System.Data.SqlClient.SqlCommand.RunExecuteReader(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, String method, DbAsyncResult result) à System.Data.SqlClient.SqlCommand.InternalExecuteNonQuery(DbAsyncResult result, String methodName, Boolean sendToPipe) à System.Data.SqlClient.SqlCommand.ExecuteNonQuery() à Old.Page4SaveButton_Click(Object sender, EventArgs e) dans \Visual Studio 2005\WebSites\ENQUETE\Old.aspx.vb:ligne 26

voici mon 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
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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Old.aspx.vb" Inherits="Old" %>
 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Page sans titre</title>
</head>
<body>
 <form id="form1" runat="server">
 
 
      <h5>Enquête de Satisfaction</h5>
 
      <asp:Panel id="Page1ViewPanel" 
 
 
        HorizontalAlign="Left"
        Font-size="12" 
 
 
        BorderColor="#404040"
        BorderStyle="Double"                     
        runat="Server" Width="986px" >  
 
        <asp:MultiView id="DevPollMultiView" ActiveViewIndex="0" runat="Server">
 
          <asp:View id="Page1" 
            runat="Server">   
 
            <asp:Label id="Page1Label" 
              Font-bold="True"                         
              Text="A-Satisfaction logiciels et Systèmes"
              runat="Server"
              AssociatedControlID="Page1"></asp:Label>
              <br />
 
            <br/>
              <asp:Label ID="Label2" runat="server" Font-Bold="True" ForeColor="Red" Text="1. Etes vous satisfait des LOGICIELS ou SYSTEMES suivants:"></asp:Label><br />
              <br/>
              &nbsp;<br/>
              <table style="width: 962px">
                  <tr>
                      <td style="width: 4591px; height: 1px">
              <asp:Label ID="Label3" runat="server" Text="Messagerie"></asp:Label><br />
                      </td>
                      <td style="height: 1px; width: 1761px;">
                          <asp:RadioButtonList ID="RadioButtonList1" runat="server" Height="20px" RepeatDirection="Horizontal" Width="583px">
                  <asp:ListItem>Satisfait</asp:ListItem>
                  <asp:ListItem>Plutôt Satisfait</asp:ListItem>
                  <asp:ListItem>Plutôt Insatisfait</asp:ListItem>
                  <asp:ListItem>Insatisfait</asp:ListItem>
                  <asp:ListItem>Sans opinion</asp:ListItem>
              </asp:RadioButtonList></td>
                  </tr>
                    </table>                             
 
            <asp:Button id="Page1Next"
              Text = "Suivant>>"
              CommandName="NextView"
              Height="25"
              Width="88px"
              runat= "Server" Font-Names="Verdana">
            </asp:Button>     
 
          </asp:View>
 
          <asp:View id="Page2" 
            runat="Server">
              &nbsp;<br/><br/>
<asp:Label id="Label13" 
              Font-bold="True"                         
              Text="B-Satisfaction Réseau, Internet et Sécurité"
              runat="Server"
              AssociatedControlID="Page1"></asp:Label>
              <br />
 
            <br/>
              <asp:Label ID="Label14" runat="server" Font-Bold="True" ForeColor="Red" Text="1. Etes vous satisfait de la qualité du réseau informatique"></asp:Label><br />
              <br/>
              <table style="width: 962px">
                  <tr>
                      <td style="width: 4591px; height: 1px">
              <asp:Label ID="Label15" runat="server" Text="Disponibilité"></asp:Label><br />
                      </td>
                      <td style="height: 1px; width: 1761px;">
                          <asp:RadioButtonList ID="rbVersion" runat="server" Height="20px" RepeatDirection="Horizontal" Width="583px">
                  <asp:ListItem>Satisfait</asp:ListItem>
                  <asp:ListItem>Plutôt Satisfait</asp:ListItem>
                  <asp:ListItem>Plutôt Insatisfait</asp:ListItem>
                  <asp:ListItem>Insatisfait</asp:ListItem>
                  <asp:ListItem>Sans opinion</asp:ListItem>
              </asp:RadioButtonList></td>
                  </tr>
</table>
            <asp:Button id="Page2Back"
              Text = "Previous"
              CommandName="PrevView"
              Height="25"
              Width="70"
              runat= "Server">
            </asp:Button> 
 
            <asp:Button id="Page2Next"
              Text = "Suivant>>"
              CommandName="NextView"
              Height="25"
              Width="84px"
              runat="Server" Font-Names="Verdana">
            </asp:Button> 
 
          </asp:View>
 
 
 
          <asp:View id="Page4"
            runat="Server">
 
          <asp:Label id="Label1"
            Font-bold="true"                                           
            Text = "Thank you for taking the survey."
            runat="Server"
            AssociatedControlID="Page4">
          </asp:Label>
 
          <br/><br/><br/><br/><br/><br/>       
 
          <asp:Button id="Page4Save"
            Text = "Save Responses"
            OnClick="Page4SaveButton_Click"
            Height="25"
            Width="110"
            runat="Server">
          </asp:Button>
 
          <asp:Button id="Page4Restart"
            Text = "Retake Survey"
            commandname="SwitchViewByID"
            commandargument="Page1"
            Height="25"
            Width="110"
            runat= "Server">
          </asp:Button>                    
 
        </asp:View>  
 
 
 
      </asp:MultiView>&nbsp;
 
    </asp:Panel> 
 
 
  </form>
 
</body>
</html>

**alicia26** · 05/12/2008, 19h20

le message dans sa totalité:

System.Data.SqlClient.SqlException: Les données chaîne ou binaires seront tronquées. L'instruction a été arrêtée. à System.Data.SqlClient.SqlConnection.OnError(SqlException exception, Boolean breakConnection) à System.Data.SqlClient.SqlInternalConnection.OnError(SqlException exception, Boolean breakConnection) à System.Data.SqlClient.TdsParser.ThrowExceptionAndWarning(TdsParserStateObject stateObj) à System.Data.SqlClient.TdsParser.Run(RunBehavior runBehavior, SqlCommand cmdHandler, SqlDataReader dataStream, BulkCopySimpleResultSet bulkCopyHandler, TdsParserStateObject stateObj) à System.Data.SqlClient.SqlCommand.FinishExecuteReader(SqlDataReader ds, RunBehavior runBehavior, String resetOptionsString) à System.Data.SqlClient.SqlCommand.RunExecuteReaderTds(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, Boolean async) à System.Data.SqlClient.SqlCommand.RunExecuteReader(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, String method, DbAsyncResult result) à System.Data.SqlClient.SqlCommand.InternalExecuteNonQuery(DbAsyncResult result, String methodName, Boolean sendToPipe) à System.Data.SqlClient.SqlCommand.ExecuteNonQuery() à Old.Page4SaveButton_Click(Object sender, EventArgs e) dans Old.aspx.vb:ligne 26

**lutecefalco** · 05/12/2008, 20h16

Surement que tu cherches à insérer une chaine trop grande par rapport à la taille du champ en base

**alicia26** · 05/12/2008, 20h32

merci pour ta réponse,j'ai fini par le comprendre et même là encore il me renvoit l'erreur suivante:

Code :

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

System.NullReferenceException: La référence d'objet n'est pas définie à une instance d'un objet. à Default4.Page4SaveButton_Click(Object sender, EventArgs e) dans \Default4.aspx.vb:ligne 34

**lutecefalco** · 05/12/2008, 20h34

Bah regarde ce qu'il y a ligne 34

**alicia26** · 05/12/2008, 20h36

et il me renvoie ceci:

System.Data.SqlClient.SqlException: Ligne 1 : syntaxe incorrecte vers 'char'. La variable '@' doit être déclarée. à System.Data.SqlClient.SqlConnection.OnError(SqlException exception, Boolean breakConnection) à System.Data.SqlClient.SqlInternalConnection.OnError(SqlException exception, Boolean breakConnection) à System.Data.SqlClient.TdsParser.ThrowExceptionAndWarning(TdsParserStateObject stateObj) à System.Data.SqlClient.TdsParser.Run(RunBehavior runBehavior, SqlCommand cmdHandler, SqlDataReader dataStream, BulkCopySimpleResultSet bulkCopyHandler, TdsParserStateObject stateObj) à System.Data.SqlClient.SqlCommand.FinishExecuteReader(SqlDataReader ds, RunBehavior runBehavior, String resetOptionsString) à System.Data.SqlClient.SqlCommand.RunExecuteReaderTds(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, Boolean async) à System.Data.SqlClient.SqlCommand.RunExecuteReader(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, String method, DbAsyncResult result) à System.Data.SqlClient.SqlCommand.InternalExecuteNonQuery(DbAsyncResult result, String methodName, Boolean sendToPipe) à System.Data.SqlClient.SqlCommand.ExecuteNonQuery() à Default4.Page4SaveButton_Click(Object sender, EventArgs e) dans \Visual Studio 2005\WebSites\ENQUETE\Default4.aspx.vb:ligne 91

**alicia26** · 05/12/2008, 20h38

bah,rien de concret ou alors c'est moi qui n'y comprend rien
la ligne 91 est surligné en rouge

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
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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
Imports System.Data
Imports System.Data.SqlClient
Partial Class Default4
    Inherits System.Web.UI.Page

    Dim DBConn As New Data.SqlClient.SqlConnection("server=(local);database=QUALIMETRE;Trusted_Connection=yes;")

    Dim DBCmd As Data.SqlClient.SqlCommand

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        DBConn.Open()
    End Sub

    ' Public Sub cmdSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdSubmit.Click
    Protected Sub Page4SaveButton_Click(ByVal sender As Object, ByVal e As System.EventArgs)

        Try

            Dim SQLQuery As String = "INSERT INTO satisfaction(Messagerie, Office, Windows, [Call-Center], Gescom, SUN5, VISION6, SUNPROCUREMENT, MULTIGEST, PAIE, [COMMENT LOG_SYS], Disponibilite_LAN, Acces_LAN, Temps_Reponse_LAN, Disponibilite_NET, Horaires_Acces_NET, Acces_SiteWeb, Temps_Reponse_NET, Securite_Data, Antivirus, AntiSpams, Firewall, Securite_Phys_PC, [COMMENT LAN_NET_SEC], Disponibilite_SI, Disponibilite_Intervenant,Disponibilite_Data, Reactivite, Prise_en_compte_Besoins, Delais_Intervention, Duree_Resolution_Incident, Qualite_Tvx_Outils, Formations_Données, Ordinateurs, Ecran, Souris_Clavier, Imprimante_Scanner, Copieur, Poste_Telephone, Disposition_Materiel, Disposition_Cables, [COMMENT Mat_SUP],DelaiFacturation, QualiteFacturation, FiabiliteFacturation, FiabiliteStatsFacturation, FiabiliteIntercos, DelaiActivationSce, DelaisProductionKits, BISYC,Consultor, Crediteur, [COMMENT Billing],Evolution_SI, DegreDSI, Opportunite, Comment) " _
& " VALUES (@Messagerie, @Office, @Windows,@[Call-Center], @Gescom,@SUN5,@VISION6, @SUNPROCUREMENT,@MULTIGEST,@PAIE, @[COMMENT LOG_SYS],@Disponibilite_LAN, @Acces_LAN, @Temps_Reponse_LAN, @Disponibilite_NET, @Horaires_Acces_NET, @Acces_SiteWeb, @Temps_Reponse_NET, @Securite_Data,@Antivirus, @AntiSpams, @Firewall, @Securite_Phys_PC, @[COMMENT LAN_NET_SEC], @Disponibilite_SI, @Disponibilite_Intervenant,@Disponibilite_Data, @Reactivite, @Prise_en_compte_Besoins, @Delais_Intervention,@Duree_Resolution_Incident,@Qualite_Tvx_Outils, @Formations_Données, @Ordinateurs, Ecran, @Souris_Clavier, @Imprimante_Scanner, @Copieur, @Poste_Telephone,@Disposition_Materiel, @Disposition_Cables, @[COMMENT Mat_SUP],@DelaiFacturation,@QualiteFacturation, @FiabiliteFacturation,@FiabiliteStatsFacturation, @FiabiliteIntercos, @DelaiActivationSce, @DelaisProductionKits, @BISYC,@Consultor, @Créditeur, @[COMMENT Billing], @Evolution_SI, @DegreDSI, @Opportunite, @Comment)"
            DBCmd = New Data.SqlClient.SqlCommand(SQLQuery, DBConn)
            DBCmd.Parameters.Add("@Messagerie", SqlDbType.Char, 50).Value = RadioButtonList1.SelectedItem.ToString
            DBCmd.Parameters.Add("@Office", SqlDbType.Char, 50).Value = RadioButtonList2.SelectedItem.ToString
            DBCmd.Parameters.Add("@Windows", SqlDbType.Char, 50).Value = RadioButtonList3.SelectedItem.ToString
            DBCmd.Parameters.Add("@[Call-Center]", SqlDbType.Char, 50).Value = RadioButtonList4.SelectedItem.ToString
            DBCmd.Parameters.Add("@Gescom", SqlDbType.Char, 50).Value = RadioButtonList5.SelectedItem.ToString
            DBCmd.Parameters.Add("@SUN5", SqlDbType.Char, 50).Value = RadioButtonList6.SelectedItem.ToString
            DBCmd.Parameters.Add("@VISION6", SqlDbType.Char, 50).Value = RadioButtonList7.SelectedItem.ToString
            DBCmd.Parameters.Add("@SUNPROCUREMENT", SqlDbType.Char, 50).Value = RadioButtonList8.SelectedItem.ToString
            DBCmd.Parameters.Add("@MULTIGEST", SqlDbType.Char, 50).Value = RadioButtonList9.SelectedItem.ToString
            DBCmd.Parameters.Add("@PAIE", SqlDbType.Char, 50).Value = RadioButtonList10.SelectedItem.ToString
            DBCmd.Parameters.Add("@[COMMENT LOG_SYS]", SqlDbType.NVarChar, 4000).Value = TextBox1.Text

            DBCmd.Parameters.Add("@Disponibilite_LAN", SqlDbType.Char, 50).Value = RadioButtonList11.SelectedItem.ToString
            DBCmd.Parameters.Add("@Acces_LAN", SqlDbType.Char, 50).Value = RadioButtonList12.SelectedItem.ToString
            DBCmd.Parameters.Add("@Temps_Reponse_LAN", SqlDbType.Char, 50).Value = RadioButtonList13.SelectedItem.ToString

            'DBCmd.Parameters.Add("@Disponibilite_NET", SqlDbType.Char, 50).Value = RadioButtonList14.SelectedItem.ToString
            'DBCmd.Parameters.Add("@Horaires_Acces_NET", SqlDbType.Char, 50).Value = RadioButtonList15.SelectedItem.ToString
            ' DBCmd.Parameters.Add("@Acces_SiteWeb", SqlDbType.Char, 50).Value = RadioButtonList16.SelectedItem.ToString
            ' DBCmd.Parameters.Add("@Temps_Reponse_NET", SqlDbType.Char, 50).Value = RadioButtonList17.SelectedItem.ToString

            DBCmd.Parameters.Add("@Securite_Data", SqlDbType.Char, 50).Value = RadioButtonList17.SelectedItem.ToString
            DBCmd.Parameters.Add("@Antivirus", SqlDbType.Char, 50).Value = RadioButtonList18.SelectedItem.ToString
            DBCmd.Parameters.Add("@AntiSpams", SqlDbType.Char, 50).Value = RadioButtonList19.SelectedItem.ToString
            DBCmd.Parameters.Add("@Firewall", SqlDbType.Char, 50).Value = RadioButtonList20.SelectedItem.ToString
            DBCmd.Parameters.Add("@Securite_Phys_PC", SqlDbType.Char, 50).Value = RadioButtonList21.SelectedItem.ToString
            DBCmd.Parameters.Add("@[COMMENT LAN_NET_SEC]", SqlDbType.NVarChar, 4000).Value = TextBox2.Text

            DBCmd.Parameters.Add("@Disponibilite_SI", SqlDbType.Char, 50).Value = RadioButtonList22.SelectedItem.ToString
            DBCmd.Parameters.Add("@Disponibilite_Intervenant", SqlDbType.Char, 50).Value = RadioButtonList23.SelectedItem.ToString
            DBCmd.Parameters.Add("@Disponibilite_Data", SqlDbType.Char, 50).Value = RadioButtonList24.SelectedItem.ToString
            DBCmd.Parameters.Add("@Reactivite", SqlDbType.Char, 50).Value = RadioButtonList33.SelectedItem.ToString
            DBCmd.Parameters.Add("@Prise_en_compte_Besoins", SqlDbType.Char, 50).Value = RadioButtonList34.SelectedItem.ToString
            DBCmd.Parameters.Add("@Delais_Intervention", SqlDbType.Char, 50).Value = RadioButtonList35.SelectedItem.ToString
            DBCmd.Parameters.Add("@Duree_Resolution_Incident", SqlDbType.Char, 50).Value = RadioButtonList36.SelectedItem.ToString
            DBCmd.Parameters.Add("@Qualite_Tvx_Outils", SqlDbType.Char, 50).Value = RadioButtonList37.SelectedItem.ToString
            DBCmd.Parameters.Add("@Formations_Données", SqlDbType.Char, 50).Value = RadioButtonList38.SelectedItem.ToString

            DBCmd.Parameters.Add("@Ordinateurs", SqlDbType.Char, 50).Value = RadioButtonList25.SelectedItem.ToString
            DBCmd.Parameters.Add("@Ecran", SqlDbType.Char, 50).Value = RadioButtonList26.SelectedItem.ToString
            DBCmd.Parameters.Add("@Souris_Clavier", SqlDbType.Char, 50).Value = RadioButtonList27.SelectedItem.ToString
            DBCmd.Parameters.Add("@Imprimante_Scanner", SqlDbType.Char, 50).Value = RadioButtonList39.SelectedItem.ToString
            DBCmd.Parameters.Add("@Copieur", SqlDbType.Char, 50).Value = RadioButtonList40.SelectedItem.ToString
            DBCmd.Parameters.Add("@Poste_Telephone", SqlDbType.Char, 50).Value = RadioButtonList41.SelectedItem.ToString

            DBCmd.Parameters.Add("@Disposition_Materiel", SqlDbType.Char, 50).Value = RadioButtonList28.SelectedItem.ToString
            DBCmd.Parameters.Add("@Disposition_Cables", SqlDbType.Char, 50).Value = RadioButtonList29.SelectedItem.ToString
            DBCmd.Parameters.Add("@[COMMENT Mat_SUP]", SqlDbType.NVarChar, 4000).Value = TextBox3.Text

            DBCmd.Parameters.Add("@DelaiFacturation", SqlDbType.Char, 50).Value = RadioButtonList42.SelectedItem.ToString

            'DBCmd.Parameters.Add("@QualiteFacturation", SqlDbType.Char, 50).Value = RadioButtonList43.SelectedItem.ToString

            DBCmd.Parameters.Add("@FiabiliteFacturation", SqlDbType.Char, 50).Value = RadioButtonList43.SelectedItem.ToString

            'DBCmd.Parameters.Add("@FiabiliteStatsFacturation", SqlDbType.Char, 50).Value = RadioButtonList52.SelectedItem.ToString
            ' DBCmd.Parameters.Add("@FiabiliteIntercos", SqlDbType.Char, 50).Value = RadioButtonList1.SelectedItem.ToString

            DBCmd.Parameters.Add("@DelaiActivationSce", SqlDbType.Char, 50).Value = RadioButtonList51.SelectedItem.ToString
            DBCmd.Parameters.Add("@DelaisProductionKits", SqlDbType.Char, 50).Value = RadioButtonList52.SelectedItem.ToString
            DBCmd.Parameters.Add("@BISYC", SqlDbType.Char, 50).Value = RadioButtonList57.SelectedItem.ToString
            DBCmd.Parameters.Add("@Consultor", SqlDbType.Char, 50).Value = RadioButtonList58.SelectedItem.ToString
            DBCmd.Parameters.Add("@Crediteur", SqlDbType.Char, 50).Value = RadioButtonList59.SelectedItem.ToString
            DBCmd.Parameters.Add("@[COMMENT Billing]", SqlDbType.NVarChar, 4000).Value = TextBox3.Text

            DBCmd.Parameters.Add("@Evolution_SI", SqlDbType.Char, 50).Value = RadioButtonList44.SelectedItem.ToString
            DBCmd.Parameters.Add("@DegreDSI", SqlDbType.Char, 50).Value = RadioButtonList46.SelectedItem.ToString
            DBCmd.Parameters.Add("@Opportunite", SqlDbType.Char, 50).Value = RadioButtonList48.SelectedItem.ToString
            DBCmd.Parameters.Add("@Comment", SqlDbType.NVarChar, 4000).Value = TextBox5.Text
            DBCmd.ExecuteNonQuery()      
      DBCmd.Dispose()
            DBCmd = Nothing

        Catch ex As Exception
            Response.Write(ex)
        End Try

multiview radiobuttonlist et insert

ASP.NET

Vue hybride

Discussions similaires

Partager

Partager