Hi,
I've a radtabstrip with three radtab and three radmultipage. The problem is on the event textchanged for a radtextbox located on the first radmultipage. On textchanged of this radtextbox, I fill another radtextboxes of the same radmultipage. Once the radtextboxes are filled with the values, if I put the mouse over the radtextboxes these radtextboxes increase. I've also a radskinmanager and if I change the skin, all the radtextboxes become ok and the mouse over has no effect. I attach a picture with the three situations: the initial form, the form with the radtextboxes bigger and the form with a new skin applied. If I remove the radmultipage from the ajaxupdatedcontrol of the radajaxmanager, the radtextboxes don't change on mouse over. I put the code with only one radtab and only one radmultipage because the problem is the same. How can I solve this?
Thanks in advance.
I've a radtabstrip with three radtab and three radmultipage. The problem is on the event textchanged for a radtextbox located on the first radmultipage. On textchanged of this radtextbox, I fill another radtextboxes of the same radmultipage. Once the radtextboxes are filled with the values, if I put the mouse over the radtextboxes these radtextboxes increase. I've also a radskinmanager and if I change the skin, all the radtextboxes become ok and the mouse over has no effect. I attach a picture with the three situations: the initial form, the form with the radtextboxes bigger and the form with a new skin applied. If I remove the radmultipage from the ajaxupdatedcontrol of the radajaxmanager, the radtextboxes don't change on mouse over. I put the code with only one radtab and only one radmultipage because the problem is the same. How can I solve this?
Thanks in advance.
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default_test.aspx.vb" Inherits="_Default_test" %><!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>Ofertas Rittal</title> <telerik:RadStyleSheetManager id="RadStyleSheetManager1" runat="server" /></head><body> <form id="form1" runat="server"> <telerik:RadScriptManager ID="RadScriptManager1" runat="server"> <Scripts> <%--Needed for JavaScript IntelliSense in VS2010--%> <%--For VS2008 replace RadScriptManager with ScriptManager--%> <asp:ScriptReference Assembly="Telerik.Web.UI" Name="Telerik.Web.UI.Common.Core.js" /> <asp:ScriptReference Assembly="Telerik.Web.UI" Name="Telerik.Web.UI.Common.jQuery.js" /> <asp:ScriptReference Assembly="Telerik.Web.UI" Name="Telerik.Web.UI.Common.jQueryInclude.js" /> </Scripts> </telerik:RadScriptManager> <telerik:RadCodeBlock ID="RadCodeBlock1" runat="server"> <script type="text/javascript"> //Put your JavaScript code here. </script> </telerik:RadCodeBlock> <label style="font-family: Calibri; font-size: small; font-weight: 700; height: 32px;">Skin:</label> <telerik:RadSkinManager ID="RadSkinManager1" Runat="server" ShowChooser="True" Skin="Windows7"> </telerik:RadSkinManager> <telerik:RadButton ID="RadButton1" runat="server" Text="Guardar preferencias"> </telerik:RadButton> <telerik:RadFormDecorator ID="FormDecorator1" runat="server" DecoratedControls="all"></telerik:RadFormDecorator> <telerik:RadAjaxManager ID="RadAjaxManager1" runat="server"> <AjaxSettings> <telerik:AjaxSetting AjaxControlID="RadAjaxManager1"> <UpdatedControls> <telerik:AjaxUpdatedControl ControlID="RadTabStrip1" /> <telerik:AjaxUpdatedControl ControlID="RadMultiPage1" /> </UpdatedControls> </telerik:AjaxSetting> </AjaxSettings> </telerik:RadAjaxManager> <telerik:RadWindowManager ID="RadWindowManager1" runat="server"> </telerik:RadWindowManager> <div> <br /> <telerik:RadTabStrip ID="RadTabStrip1" runat="server" MultiPageID="RadMultiPage1" Height="26px" Width="500px" SelectedIndex="1"> <Tabs> <telerik:RadTab runat="server" PageViewID="RadPageView1" Text="Cabecera"> </telerik:RadTab> </Tabs> </telerik:RadTabStrip> <telerik:RadMultiPage ID="RadMultiPage1" Runat="server" Height="64px" Width="500px" SelectedIndex="0" Font-Names="Calibri" Font-Size="Small"> <telerik:RadPageView ID="RadPageView1" runat="server" BorderStyle="Outset"> <div class="inputs"> <br /> <telerik:RadTextBox ID="RadTextBox5" Runat="server" ReadOnly="True" Text="Cliente:" Width="75px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" BorderColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadMaskedTextBox ID="TB_Cod_cliente" Runat="server" Mask="########" Width="60px" AutoPostBack="True"> </telerik:RadMaskedTextBox> <telerik:RadTextBox ID="TB_Company" Runat="server" Width="300px"> </telerik:RadTextBox> <br /> <br /> <telerik:RadTextBox ID="RadTextBox6" Runat="server" ReadOnly="True" style="font-family: Calibri; font-weight: 700" Text="Dirección:" Width="75px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadTextBox ID="TB_Address1" Runat="server" Width="365px"> </telerik:RadTextBox> <br /> <telerik:RadTextBox ID="RadTextBox7" Runat="server" ReadOnly="True" style="font-family: Calibri; font-weight: 700" Text="" Width="75px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadTextBox ID="TB_Address2" Runat="server" Width="365px"> </telerik:RadTextBox> <br /> <br /> <telerik:RadTextBox ID="RadTextBox8" Runat="server" ReadOnly="True" style="font-family: Calibri; font-weight: 700" Text="Cód. postal:" Width="75px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadMaskedTextBox ID="TB_Zip" Runat="server" Mask="#####" Width="35px"> </telerik:RadMaskedTextBox> <telerik:RadTextBox ID="RadTextBox4" Runat="server" ReadOnly="True" style="font-family: Calibri; font-weight: 700" Text="Población:" Width="65px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadTextBox ID="TB_City" Runat="server" Width="240px"> </telerik:RadTextBox> <br /> <br /> <telerik:RadTextBox ID="RadTextBox10" Runat="server" ReadOnly="True" style="font-family: Calibri; font-weight: 700" Text="Provincia:" Width="75px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadComboBox ID="DD_State" runat="server" DataSourceID="Provincias" DataTextField="descripcion" DataValueField="descripcion"> </telerik:RadComboBox> <telerik:RadTextBox ID="RadTextBox17" Runat="server" ReadOnly="True" style="font-family: Calibri; font-weight: 700" Text="Contacto:" Width="70px" Font-Bold="True" Font-Names="Calibri" Font-Size="Small" BorderWidth="0px" BackColor="Transparent" TabIndex="-1"> </telerik:RadTextBox> <telerik:RadComboBox ID="DD_Contacto" runat="server" AutoPostBack="True"> </telerik:RadComboBox> <br /> <br /> <hr width="490px" /> <br /> </div> </telerik:RadPageView> </telerik:RadMultiPage> <asp:SqlDataSource ID="Provincias" runat="server" ConnectionString="<%$ ConnectionStrings:OfflineEDConnectionString %>" SelectCommand="SELECT UPPER([descripcion]) AS descripcion FROM [Provincias_Lov_Informes] ORDER BY [descripcion]"> </asp:SqlDataSource> </div> </form></body></html>Imports Telerik.Web.UIImports System.Data.SqlClientImports System.DataPartial Class _Default_test Inherits System.Web.UI.Page Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load If Not IsPostBack Then retreive_preferences() End If End Sub Protected Sub TB_Cod_cliente_TextChanged(sender As Object, e As System.EventArgs) Handles TB_Cod_cliente.TextChanged load_company_data(TB_Cod_cliente.Text) End Sub Protected Sub load_company_data(ByVal cod_cli As String) If cod_cli.Length > 0 Then RadTabStrip1.SelectedIndex = 0 RadMultiPage1.SelectedIndex = 0 Dim conn As New SqlConnection() conn.ConnectionString = ConfigurationManager.ConnectionStrings("OfflineEDConnectionString").ConnectionString Dim cmd As New SqlCommand cmd.CommandType = CommandType.Text cmd.CommandText = "SELECT company_name,address_1,address_2,zip,city,State_ from company where cod_cliente=@cod_cliente" cmd.Connection = conn ' Create a SqlParameter for each parameter in the stored procedure. Dim codclienteParam As New SqlParameter("@cod_cliente", cod_cli) cmd.Parameters.Add(codclienteParam) Dim found As Boolean = False Dim reader As SqlDataReader Dim previousConnectionState As ConnectionState = conn.State Try If conn.State = ConnectionState.Closed Then conn.Open() End If reader = cmd.ExecuteReader() Using reader While reader.Read ' Process SprocResults datareader here. TB_Company.Text = reader.GetValue(0).ToString TB_Address1.Text = reader.GetValue(1).ToString TB_Address2.Text = reader.GetValue(2).ToString TB_Zip.Text = reader.GetValue(3).ToString TB_City.Text = reader.GetValue(4).ToString DD_State.SelectedValue = reader.GetValue(5).ToString found = True End While End Using Finally If previousConnectionState = ConnectionState.Closed Then conn.Close() End If End Try If found = False Then DD_Contacto.DataSource = CreateDataSource(cod_cli) DD_Contacto.DataTextField = "nombre_completo" DD_Contacto.DataValueField = "contact_id_text" DD_Contacto.DataBind() End If End If End Sub Function CreateDataSource(ByVal cod_cliente As String) As ICollection Dim dt As New DataTable Dim dr As DataRow dt.Columns.Add(New DataColumn("contact_id_text", GetType(String))) dt.Columns.Add(New DataColumn("nombre_completo", GetType(String))) dr = dt.NewRow() dr(0) = "-1" dr(1) = "" dt.Rows.Add(dr) dr = dt.NewRow() dr(0) = "0" dr(1) = "_Nuevo registro_" dt.Rows.Add(dr) Dim conn As New SqlConnection() conn.ConnectionString = ConfigurationManager.ConnectionStrings("OfflineEDConnectionString").ConnectionString Dim cmd As New SqlCommand cmd.CommandType = CommandType.Text cmd.CommandText = "SELECT contact_id_text,full_name from contact where cod_cliente=@cod_cliente" cmd.Connection = conn ' Create a SqlParameter for each parameter in the stored procedure. Dim codclienteParam As New SqlParameter("@cod_cliente", cod_cliente) cmd.Parameters.Add(codclienteParam) Dim found As Boolean = False Dim reader As SqlDataReader Dim previousConnectionState As ConnectionState = conn.State Try If conn.State = ConnectionState.Closed Then conn.Open() End If reader = cmd.ExecuteReader() Using reader While reader.Read ' Process SprocResults datareader here. dr = dt.NewRow() dr(0) = reader.GetValue(0).ToString dr(1) = reader.GetValue(1).ToString Try dt.Rows.Add(dr) Catch ex As Exception End Try End While End Using Finally If previousConnectionState = ConnectionState.Closed Then conn.Close() End If End Try Dim dv As New DataView(dt) dv.Sort = "nombre_completo" Return dv End Function Protected Sub RadButton1_Click(sender As Object, e As System.EventArgs) Handles RadButton1.Click Dim usuario As String = Context.Request.ServerVariables("AUTH_USER") If usuario.Split("\").Count > 1 Then usuario = usuario.Split("\")(1) End If If usuario.Length > 0 Then Dim conn As New SqlConnection() conn.ConnectionString = ConfigurationManager.ConnectionStrings("OfertasConnectionString").ConnectionString Dim cmd As New SqlCommand cmd.CommandType = CommandType.Text cmd.CommandText = "SELECT count(*) from Preferencias where usuario=@usuario" cmd.Connection = conn ' Create a SqlParameter for each parameter in the stored procedure. Dim userParam As New SqlParameter("@usuario", usuario) cmd.Parameters.Add(userParam) Dim found As Integer = 0 Dim reader As SqlDataReader Dim previousConnectionState As ConnectionState = conn.State Try If conn.State = ConnectionState.Closed Then conn.Open() End If reader = cmd.ExecuteReader() Using reader While reader.Read ' Process SprocResults datareader here. found = reader.GetValue(0).ToString End While End Using Finally If previousConnectionState = ConnectionState.Closed Then conn.Close() End If End Try If found = 0 Then insert_preferences(usuario, "skin", RadSkinManager1.Skin) Else update_preferences(usuario, "skin", RadSkinManager1.Skin) End If End If End Sub Protected Sub update_preferences(ByVal username As String, ByVal field As String, ByVal value As String) Dim conn As New SqlConnection() conn.ConnectionString = ConfigurationManager.ConnectionStrings("OfertasConnectionString").ConnectionString Dim cmd As New SqlCommand cmd.CommandType = CommandType.Text cmd.CommandText = "update preferencias set " + field + "=@value where usuario=@usuario" cmd.Connection = conn ' Create a SqlParameter for each parameter in the stored procedure. Dim valueParam As New SqlParameter("@value", value) cmd.Parameters.Add(valueParam) Dim userParam As New SqlParameter("@usuario", username) cmd.Parameters.Add(userParam) Dim rowCount As Integer Dim previousConnectionState As ConnectionState previousConnectionState = conn.State Try If conn.State = ConnectionState.Closed Then conn.Open() End If rowCount = cmd.ExecuteNonQuery() Finally If previousConnectionState = ConnectionState.Closed Then conn.Close() End If End Try If rowCount = 0 Then RadWindowManager1.RadAlert("Error al guardar las preferencias", 330, 100, "Error!", "alertCallBackFn") Else RadWindowManager1.RadAlert("Preferencias guardadas correctamente", 330, 100, "Ok", "alertCallBackFn") End If End Sub Protected Sub insert_preferences(ByVal username As String, ByVal field As String, ByVal value As String) Dim conn As New SqlConnection() conn.ConnectionString = ConfigurationManager.ConnectionStrings("OfertasConnectionString").ConnectionString Dim cmd As New SqlCommand cmd.CommandType = CommandType.Text cmd.CommandText = "insert into preferencias (usuario," + field + ") values (@usuario,@value)" cmd.Connection = conn ' Create a SqlParameter for each parameter in the stored procedure. Dim valueParam As New SqlParameter("@value", value) cmd.Parameters.Add(valueParam) Dim userParam As New SqlParameter("@usuario", username) cmd.Parameters.Add(userParam) Dim rowCount As Integer Dim previousConnectionState As ConnectionState previousConnectionState = conn.State Try If conn.State = ConnectionState.Closed Then conn.Open() End If rowCount = cmd.ExecuteNonQuery() Finally If previousConnectionState = ConnectionState.Closed Then conn.Close() End If End Try If rowCount = 0 Then RadWindowManager1.RadAlert("Error al guardar las preferencias", 330, 100, "Error!", "alertCallBackFn") Else RadWindowManager1.RadAlert("Preferencias guardadas correctamente", 330, 100, "Ok", "alertCallBackFn") End If End Sub Protected Sub retreive_preferences() Dim usuario As String = Context.Request.ServerVariables("AUTH_USER") If usuario.Split("\").Count > 1 Then usuario = usuario.Split("\")(1) End If If usuario.Length > 0 Then Dim conn As New SqlConnection() conn.ConnectionString = ConfigurationManager.ConnectionStrings("OfertasConnectionString").ConnectionString Dim cmd As New SqlCommand cmd.CommandType = CommandType.Text cmd.CommandText = "SELECT skin from Preferencias where usuario=@usuario" cmd.Connection = conn ' Create a SqlParameter for each parameter in the stored procedure. Dim userParam As New SqlParameter("@usuario", usuario) cmd.Parameters.Add(userParam) Dim skin As String = "" Dim reader As SqlDataReader Dim previousConnectionState As ConnectionState = conn.State Try If conn.State = ConnectionState.Closed Then conn.Open() End If reader = cmd.ExecuteReader() Using reader While reader.Read ' Process SprocResults datareader here. skin = reader.GetValue(0).ToString End While End Using Finally If previousConnectionState = ConnectionState.Closed Then conn.Close() End If End Try If skin.Length > 0 Then RadSkinManager1.Skin = skin End If End If End SubEnd Class