RAISEEVENT EN ASP.NET CON VB.NET
Publicado por GibsonNegra (1 intervención) el 19/01/2012 18:56:14
Hola a Todos
Estoy tratando de hacer un simple ejemplo en ASP.NET con Visual Basic en VS 2008.
La idea es simplemente disparar un Evento desde un Control de Usuario (WebControl)
para que desde la Pagina que lo contiene a dicho Control ejecute un Mensaje indicando que fué
Exitoso el disparo del Evento pero algo no estoy haciendo bien ya que no logro disparar el Evento.
Es un simple proyecto con una pagina aspx default un control de nombre www con un buton1.
A continuación expongo el código que tengo :
En el Control de Usuario el Code Behind es
Partial Public Class WWW
Inherits System.Web.UI.UserControl
'Declaración del Evento a ser Disparado
Public Event MiEvento As EventHandler
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
'Disparo el Evento
RaiseEvent MiEvento(Me, e)
End Sub
End Class
En la página que contiene dicho control el Code Behind es:
Partial Class _Default
Inherits System.Web.UI.Page
'Declaro el Objeto que contiene el Evento a Disparar
Public WithEvents W As www
Public Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'Instancio el Objeto que contiene el Evento a Disparar
Dim W As New www
End Sub
Public Sub W_MiEvento(ByVal sender As Object, ByVal e As CommandEventArgs) Handles W.MiEvento
'Código a Ejecutarse al ser disprado el Evento
MsgBox("Disparo el Evento")
End Sub
End Class
Si alguien puede ayudarme lo agradezco mucho !!
Saludos y Gracias !!
Estoy tratando de hacer un simple ejemplo en ASP.NET con Visual Basic en VS 2008.
La idea es simplemente disparar un Evento desde un Control de Usuario (WebControl)
para que desde la Pagina que lo contiene a dicho Control ejecute un Mensaje indicando que fué
Exitoso el disparo del Evento pero algo no estoy haciendo bien ya que no logro disparar el Evento.
Es un simple proyecto con una pagina aspx default un control de nombre www con un buton1.
A continuación expongo el código que tengo :
En el Control de Usuario el Code Behind es
Partial Public Class WWW
Inherits System.Web.UI.UserControl
'Declaración del Evento a ser Disparado
Public Event MiEvento As EventHandler
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
'Disparo el Evento
RaiseEvent MiEvento(Me, e)
End Sub
End Class
En la página que contiene dicho control el Code Behind es:
Partial Class _Default
Inherits System.Web.UI.Page
'Declaro el Objeto que contiene el Evento a Disparar
Public WithEvents W As www
Public Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'Instancio el Objeto que contiene el Evento a Disparar
Dim W As New www
End Sub
Public Sub W_MiEvento(ByVal sender As Object, ByVal e As CommandEventArgs) Handles W.MiEvento
'Código a Ejecutarse al ser disprado el Evento
MsgBox("Disparo el Evento")
End Sub
End Class
Si alguien puede ayudarme lo agradezco mucho !!
Saludos y Gracias !!
Valora esta pregunta


0