Hello
I have radiobuttons in my webform. I also have a radgrid which is visible=false when I load the form. When I select a choice on the radiobutton, I want my radgrid become visible. This is working fine. But I lose all rows that I have in my radgrid. I can only see a light blue horizontal line. Nothing appear in the radgrid. When I don't put the radgrid.visible=false I see my rows in my grid...
Here is my code
I have radiobuttons in my webform. I also have a radgrid which is visible=false when I load the form. When I select a choice on the radiobutton, I want my radgrid become visible. This is working fine. But I lose all rows that I have in my radgrid. I can only see a light blue horizontal line. Nothing appear in the radgrid. When I don't put the radgrid.visible=false I see my rows in my grid...
Here is my code
| <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="FEN_CHANGEMENT_INSTALLATION_LOGICIELLE.aspx.vb" Inherits="Interface_RT.FEN_CHANGEMENT_INSTALLATION_LOGICIELLE" %> |
| <%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %> |
| <%@ Register TagPrefix="header" TagName="a" Src="Template.ascx" %> |
| <%@ Register TagPrefix="header" TagName="b" Src="TemplateFin.ascx" %> |
| <!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>Assistance TI</title> |
| <link href="Style.css" type="text/css" rel="stylesheet"/> |
| </head> |
| <body> |
| <form id="form1" runat="server"> |
| <div> |
| <header:a id="A1" runat="server"></header:a> |
| <asp:scriptmanager ID="ScriptManager1" runat="server" ></asp:scriptmanager> |
| <br /> |
| <table width="70%" align=center> |
| <tr> |
| <td colspan=2 align=center><asp:Label runat=server ID="LbTitre" Text="Installation logiciel" CssClass="TexteBlanc16center"></asp:Label><br /><br /></td> |
| </tr> |
| <tr> |
| <td align="right" width="40%"><asp:Label runat=server ID="LbCodeUtilisateur" Text="Logiciel: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left" width="60%"><telerik:RadTextBox ID="TxtLogiciel" runat="server" Width="200px"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="Label1" Text="Servant à : " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"> |
| <asp:RadioButtonList runat=server ID="RbntListServant" Width="225px" CssClass="TexteBlanc12Left" BorderColor=White BorderWidth=1 > |
| <asp:ListItem Text="L'administratif" Value=1 ></asp:ListItem> |
| <asp:ListItem Text="La pédagogie" Value=2 ></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbLocal" Text="Local(s): " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtLocal" runat="server" Width="200px"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbPersonneContact" Text="Nom de la personne contact: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtPersonneContact" runat="server" Width="200px"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbPosteTelephonique" Text="Poste téléphonique: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtPosteTelephonique" runat="server"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbNoCSBE" Text="No CSBE: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left" > |
| <asp:RadioButtonList runat=server ID="RbntListNoCSBE" AutoPostBack=true Width="225px" BorderColor=White BorderWidth=1 CssClass="TexteBlanc12Left"> |
| <asp:ListItem Text="Tous" Value=1 ></asp:ListItem> |
| <asp:ListItem Text="Poste(s)" Value=2 ></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr id="TableRadgrid" runat=server> |
| <td valign=top align=right><asp:Label runat=server ID="Label3" Text="Postes(#CSBE): " CssClass="TexteBlanc12"></asp:Label></td> |
| <td> |
| <telerik:RadGrid |
| ID="RadGrid_Postes" |
| Skin="Vista" |
| runat="server"> |
| <MasterTableView |
| EditMode="InPlace"> |
| <Columns> |
| <telerik:GridTemplateColumn UniqueName="NoCSBE" HeaderText="# CSBE"> |
| <ItemTemplate> |
| <asp:TextBox ID="TxtNoCsbe" runat="server"></asp:TextBox> |
| </ItemTemplate> |
| </telerik:GridTemplateColumn> |
| </Columns> |
| </MasterTableView> |
| </telerik:RadGrid> |
| <asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="Ajouter une ligne" /> |
| </td> |
| </tr> |
| <tr> |
| <td align="right"><asp:Label runat=server ID="LbLicence" Text="Avez vous la licence?: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"> |
| <asp:RadioButtonList runat=server Width="225px" AutoPostBack=true ID="RbntListLicence" BorderColor=White BorderWidth=1 CssClass="TexteBlanc12Left"> |
| <asp:ListItem Text="Non" Value=1></asp:ListItem> |
| <asp:ListItem Text="Oui" Value=2></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr visible=false id="TablePB" runat=server> |
| <td align=right> |
| <asp:Label runat=server ID="LbPB" Text="Poste Budgétaire: " CssClass="TexteBlanc12"></asp:Label> |
| </td> |
| <td align=left> |
| <telerik:RadTextBox ID="TxtPosteBudgetaire" runat="server"></telerik:RadTextBox> |
| </td> |
| </tr> |
| <tr visible=false id="TableNombre" runat=server> |
| <td align=right> |
| <asp:Label runat=server ID="Label2" Text="Quel genre de licence?: " CssClass="TexteBlanc12"></asp:Label> |
| </td> |
| <td align=left> |
| <asp:RadioButtonList runat=server ID="RbntListEtabCommNbre" Width="225px" AutoPostBack=true CssClass="TexteBlanc12Left" BorderColor=White BorderWidth=1> |
| <asp:ListItem Text="Établissement/Commission" Value=1></asp:ListItem> |
| <asp:ListItem Text="Nombre" Value=2></asp:ListItem> |
| </asp:RadioButtonList> |
| </td> |
| </tr> |
| <tr visible=false id="TableNombre2" runat=server> |
| <td align=right> |
| <asp:Label runat=server ID="LbNombre" Text="Nombre de licences: " CssClass="TexteBlanc12"></asp:Label> |
| </td> |
| <td align=left> |
| <telerik:RadTextBox ID="RadTextBox1" runat="server"></telerik:RadTextBox> |
| </td> |
| </tr> |
| <tr> |
| <td align="right" valign="top"><asp:Label runat=server ID="LbDescriptionProbleme" Text="Description du problème: " CssClass="TexteBlanc12"></asp:Label></td> |
| <td align="left"><telerik:RadTextBox ID="TxtDescriptionProbleme" TextMode="MultiLine" Height="150px" Width="450px" runat="server"></telerik:RadTextBox></td> |
| </tr> |
| <tr> |
| <td> <br /></td> |
| <td align=left ><br /><asp:Button runat=server ID="BtnSauvegarder" Text="Sauvegarder" /></td> |
| </tr> |
| </table> |
| <header:b id="A2" runat="server"></header:b> |
| </div> |
| </form> |
| </body> |
| </html> |
| Imports Telerik.Web.UI |
| Partial Public Class FEN_CHANGEMENT_INSTALLATION_LOGICIELLE |
| Inherits System.Web.UI.Page |
| Public fonctionsvbs As New fonctionsvb |
| Public liste As New List(Of String) |
| Public listcount As Integer |
| Public dt As DataTable |
| Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load |
| If Not IsPostBack Then |
| dt = New DataTable() |
| dt.Columns.Add(New DataColumn("RowNumber", GetType(String))) |
| 'Ajouter le nombre de colonne au début |
| AddRow(dt) |
| AddRow(dt) |
| AddRow(dt) |
| 'Me.RadGrid_Postes.Visible = False |
| Me.RadGrid_Postes.Enabled = False |
| End If |
| End Sub |
| Private Sub BtnSauvegarder_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnSauvegarder.Click |
| Dim sujet As String |
| Dim message As String |
| sujet = "Poste élève portable" |
| message = "$ rt create –t ticket" & _ |
| "<br>Queue: " & Session("sFile") & _ |
| "<br>Subject: Poste élève portable" & _ |
| "<br>Status: new" & _ |
| "<br>Content:Local:" & Me.TxtLocal.Text & " Problème:" & Me.TxtDescriptionProbleme.Text & _ |
| "<br>ENDOFCONTENT()" & _ |
| "<br>Due:" & _ |
| "<br>Starts:" & _ |
| "<br>Started:" & _ |
| "<br>Resolved:" & _ |
| "<br>Owner: " & Session("sPropriétaire") & _ |
| "<br>Requestor: " & Session("sUsager") & _ |
| "<br>Cc:" & _ |
| "<br>AdminCc:" & _ |
| "<br>TimeWorked:" & _ |
| "<br>TimeEstimated:" & _ |
| "<br>TimeLeft:" & _ |
| "<br>Priority: " & _ |
| "<br>InitialPriority:" & _ |
| "<br>FinalPriority:" & _ |
| "<br>DependsOn:" & _ |
| "<br>RefersTo:" & _ |
| "<br>ReferredToBy:" & _ |
| "<br>Children:" & _ |
| "<br>DependsOnBy:" & _ |
| "<br>Parents:" |
| fonctionsvbs.CreerRequis(sujet, message) |
| End Sub |
| Private Sub RbntListLicence_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RbntListLicence.SelectedIndexChanged |
| If RbntListLicence.SelectedValue = 1 Then 'non |
| Me.TablePB.Visible = True |
| Me.TableNombre.Visible = False |
| Me.TableNombre.Visible = False |
| ElseIf RbntListLicence.SelectedValue = 2 Then 'oui |
| Me.TablePB.Visible = False |
| Me.TableNombre.Visible = True |
| End If |
| End Sub |
| Private Sub RbntListEtabCommNbre_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RbntListEtabCommNbre.SelectedIndexChanged |
| If RbntListEtabCommNbre.SelectedValue = 1 Then 'Établissement/Commission |
| Me.TableNombre2.Visible = False |
| ElseIf RbntListEtabCommNbre.SelectedValue = 2 Then 'Nombre |
| Me.TableNombre2.Visible = True |
| End If |
| End Sub |
| Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) |
| Dim countitem As Integer |
| Dim dt As DataTable = DirectCast(ViewState("dt"), DataTable) |
| countitem = RadGrid_Postes.Items.Count |
| Dim cpt As Integer = 0 |
| For Each Item As GridDataItem In RadGrid_Postes.Items |
| Dim txtcode As TextBox = DirectCast(Item("NoCsbe").FindControl("TxtNoCsbe"), TextBox) |
| If Not (txtcode.Text Is Nothing) And txtcode.Text <> "" Then |
| liste.Add(txtcode.Text) |
| End If |
| Next |
| ViewState("dt") = AddRow(dt) |
| listcount = liste.Count |
| RadGrid_Postes.Rebind() |
| While cpt < listcount |
| Dim txtcode As TextBox = DirectCast(RadGrid_Postes.Items(cpt)("NoCsbe").FindControl("TxtNoCsbe"), TextBox) |
| txtcode.Text = liste.Item(cpt) |
| cpt = cpt + 1 |
| End While |
| End Sub |
| Private Sub RadGrid_Postes_NeedDataSource(ByVal source As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles RadGrid_Postes.NeedDataSource |
| If Not IsPostBack Then |
| dt = AddRow(dt) |
| ' call the method to create row |
| ViewState("dt") = dt |
| End If |
| dt = DirectCast(ViewState("dt"), DataTable) |
| RadGrid_Postes.DataSource = dt |
| End Sub |
| Private Function AddRow(ByVal dt As DataTable) As DataTable |
| ' method to create row |
| Dim dr As DataRow = dt.NewRow() |
| dr("RowNumber") = "" |
| dt.Rows.Add(dr) |
| Return dt |
| End Function |
| Private Sub RadGrid_Postes_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGrid_Postes.PreRender |
| ' RadGrid_Postes.MasterTableView.RenderColumns(3).Display = False |
| End Sub |
| Private Sub RbntListNoCSBE_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RbntListNoCSBE.SelectedIndexChanged |
| If RbntListNoCSBE.SelectedValue = 1 Then 'Tous |
| 'Me.TableRadgrid.Visible = False |
| Me.RadGrid_Postes.Enabled = False |
| ElseIf RbntListNoCSBE.SelectedValue = 2 Then 'Postes |
| 'Me.TableRadgrid.Visible = True |
| Me.RadGrid_Postes.Enabled = True |
| End If |
| End Sub |
| End Class |