[SOLUCIONADO] Ventana emergente vb.net

[maialenlopez]

Hola;

He creado una aplicacion web en la que necesito que cuando se le de a un botos se abra una ventana emergente con unos datos y mediante un botón se cierre.

He echo esto en la pagina aspx pero si alguien me puede ayudar con algo mas.

Código aspx:

<asp:Button ID="Button1" runat="server" Text="BOTON" />
            <script type="text/javascript" >
                function url() {
                    hidden = open('../Validar-Rechazar/Numero.aspx', 'NewWindow', 'top=300,left=600,width=100,height=100');
                }
            </script>
 

En el codebehind tengo lo siguiente:

Código vb.net:

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Button1.Attributes.Add("onclick", "javascript:url();")
    End Sub
 

Esto me abre una pagina web pero lo que me gustaria es que abriese una pantalla emergente normal.

¿como puedo hacerlo?

[maialenlopez]

He visto en la web que tambien se suele utilizar lo siguiente y que esto he comprobado y si muestra la ventana como mas o menos quiero yo pero no se como funcion ni como mostrar contenido dentro de este ni nada.

Código vb.net:

Dim frm As New Form
        frm.ShowDialog()
 

[maialenlopez]

Ya he encontrado solución yo misma. Gracias de todos formas a todos. Pongo aquí el resultado por si a alguien le sirve.

Código vb.net:

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        ALERTA()
    End Sub
 
    Private Sub ALERTA()
        Dim numHoja As Integer
        Dim tipoHoja, tipo As String
 
        tipo = Request.QueryString("tipo")
        numHoja = Request.QueryString("identificador")
 
        tipoHoja = tipo & numHoja
 
        Dim alertone As String = "<script language='JavaScript' type='text/javascript'>" & _
                                    "alert('Nº de hoja: ' + '" & tipoHoja & "' + ' -----  Nº de validación: ');" & _
                                "<" & "/script>"
 
 
        Page.RegisterStartupScript("Alertone", alertone)
    End Sub