Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/02/2013, 09:10
maialenlopez
 
Fecha de Ingreso: abril-2012
Mensajes: 449
Antigüedad: 12 años, 9 meses
Puntos: 7
Sonrisa Respuesta: problema con el alert de javascript en vb.net

Cita:
Iniciado por maialenlopez Ver Mensaje
Hola;

Tengo una aplicación web y en el momento que un cliente clica en un botón necesito que se muestre una alerta con el contenido de una variable.

Para que me muestre la alerta he echo lo siguiente:
Código vb.net:
Ver original
  1. Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  2.         ALERTA()
  3. End Sub
  4.  
  5.     Private Sub ALERTA()
  6.         Dim numHoja As Integer
  7.         Dim tipoHoja, tipo As String
  8.  
  9.         tipo = Request.QueryString("tipo")
  10.         numHoja = Request.QueryString("identificador")
  11.  
  12.         tipoHoja = tipo & numHoja
  13.  
  14.         Dim alertone As String = "<script language='JavaScript' type='text/javascript'>" & _
  15.                                 "alert('Nº de hoja: ');" & _
  16.                                 "<" & "/script>"
  17.  
  18.         Page.RegisterStartupScript("Alertone", alertone)
  19.     End Sub

Si hago esto todo me lo muestra perfectamente pero como se puede ver, donde tengo el alert() no le paso ninguna variable. Hay me gustaría pasarle la variable tipoHoja y que en la alerta me mostrara lo escrito mas la variable, es decir: Nº de hoja: (valor de tipoHoja)

¿Como puedo hacerlo?
Ya he conseguido hacerlo de esta forma pero tengo un problema. Esta aplicación tiene que ejecutarse en el servidor desde un cliente y a la hora de lanzar esta alerta, me desfigura en contenido del css que tengo puesto en mi aplicación, exactamente el menú que tengo me lo muestra diferente a como lo tengo puesto en el css.

¿Alguien me puede decir por que me ocurre eso?

Esto es tal y como lo he conseguido:
Código vb.net:
Ver original
  1. Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  2.         ALERTA()
  3.     End Sub
  4.  
  5.     Private Sub ALERTA()
  6.         Dim numHoja As Integer
  7.         Dim tipoHoja, tipo As String
  8.  
  9.         tipo = Request.QueryString("tipo")
  10.         numHoja = Request.QueryString("identificador")
  11.  
  12.         tipoHoja = tipo & numHoja
  13.  
  14.         Dim alertone As String = "<script language='JavaScript' type='text/javascript'>" & _
  15.                                     "alert('Nº de hoja: ' + '" & tipoHoja & "' ');" & _
  16.                                 "<" & "/script>"
  17.  
  18.  
  19.         Page.RegisterStartupScript("Alertone", alertone)
  20.     End Sub
__________________
Gracias por todo;

Un saludo