none
mi boton asp no funciona en el primer clic RRS feed

  • Pregunta

  • hola,

    tengo un dropdownlist un textbox y un boton en un formulario web aspx, al hacer clic en el boton envio dos parametros a un webform aspx, y con eso abrirla como popup , pero al hacerle el primer clic, no aparece nada; al darle un segundo clic recien aparece el popup. y si cambio de parametro y hago clic me aparece el popup pero con el parametro anterior, nose como solucionarlo, agradeceria su ayuda.

    Protected Sub btnImprimir_Click(sender As Object, e As EventArgs) Handles btnImprimir.Click
            lbError.Visible = False
            If dlTipo.SelectedValue <> 0 Then
    
                If txtId.Text = "" Then
                    lbError.Visible = True
                    lbError.Text = "Ingrese un codigo de busqueda"
                Else
    
                    If dlTipo.SelectedValue = 1 Then
    
                        btnImprimir.Attributes("onclick") = "javascript:window.open('pagReporte.aspx?Enc=id_pedido&id_pedido=" & txtId.Text & "','AltaTemas','toolbar=no,status=no,menubar=no,location=no,directories=no,resizable=no,scrollbars=no,width=1200,height=600,left=100,top=100');"
    
                End If
                    End If
            Else
                    lbError.Visible = True
                    lbError.Text = "Seleccione el articulo que quiere imprimir"
    
            End If
        End Sub
    y codigo html del boton
    <asp:Button ID="btnImprimir" runat="server" Text="Impr." style="width: 43px" />


    jueves, 23 de abril de 2015 17:05

Respuestas

  • hola

    tendrias que usar

    Protected Sub btnImprimir_Click(sender As Object, e As EventArgs) Handles btnImprimir.Click
    	lbError.Visible = False
    	If dlTipo.SelectedValue <> 0 Then
    
    		If txtId.Text = "" Then
    			lbError.Visible = True
    			lbError.Text = "Ingrese un codigo de busqueda"
    		Else
    
    			If dlTipo.SelectedValue = 1 Then
    
    				Dim script As String = "window.open('pagReporte.aspx?Enc=id_pedido&id_pedido=" & txtId.Text & "','AltaTemas','toolbar=no,status=no,menubar=no,location=no,directories=no,resizable=no,scrollbars=no,width=1200,height=600,left=100,top=100');"
    
    				ScriptManager.RegisterStartupScript(Page, GetType(String), "popup", script, True)
    				
    			End If
    			
    		End If
    	Else
    			lbError.Visible = True
    			lbError.Text = "Seleccione el articulo que quiere imprimir"
    
    	End If
    End Sub 

    tienes que usar el ScriptManager.RegisterStartupScript()

    saludos


    Leandro Tuttini

    Blog
    MVP Profile
    Buenos Aires
    Argentina

    • Marcado como respuesta Luis Vizcarra jueves, 23 de abril de 2015 17:55
    jueves, 23 de abril de 2015 17:33

Todas las respuestas

  • hola

    tendrias que usar

    Protected Sub btnImprimir_Click(sender As Object, e As EventArgs) Handles btnImprimir.Click
    	lbError.Visible = False
    	If dlTipo.SelectedValue <> 0 Then
    
    		If txtId.Text = "" Then
    			lbError.Visible = True
    			lbError.Text = "Ingrese un codigo de busqueda"
    		Else
    
    			If dlTipo.SelectedValue = 1 Then
    
    				Dim script As String = "window.open('pagReporte.aspx?Enc=id_pedido&id_pedido=" & txtId.Text & "','AltaTemas','toolbar=no,status=no,menubar=no,location=no,directories=no,resizable=no,scrollbars=no,width=1200,height=600,left=100,top=100');"
    
    				ScriptManager.RegisterStartupScript(Page, GetType(String), "popup", script, True)
    				
    			End If
    			
    		End If
    	Else
    			lbError.Visible = True
    			lbError.Text = "Seleccione el articulo que quiere imprimir"
    
    	End If
    End Sub 

    tienes que usar el ScriptManager.RegisterStartupScript()

    saludos


    Leandro Tuttini

    Blog
    MVP Profile
    Buenos Aires
    Argentina

    • Marcado como respuesta Luis Vizcarra jueves, 23 de abril de 2015 17:55
    jueves, 23 de abril de 2015 17:33
  • Gracias , ya esta solucionado.

    jueves, 23 de abril de 2015 17:56