como crear ventana emergente para FireFox

[javitxin10]

Hola a todos!

necesito sacar ventanas emergentes por ejemplo cuando se pulsa en una lista de mensajes, para ke muestre el cuerpo del mensaje. Tengo creadas ventanas emergentes de esta manera:

Public Sub Opennewwindow(ByVal PagePath As String)

Dim Clientscript As String

Clientscript = "<script>window.open('" & PagePath & "','RESULTADO','dependent=yes height=650 width=750 scrollbar=yes')</script>"

Response.Write(Clientscript)

End Sub


y despues llamando a este metodo cuando necesito sacar la ventana.

el problema es que en Internet Explorer la ventana sale como yo quiero, es una ventana nueva mas pequeña y de las dimensiones que le marco. pero en opera y firefox se me abre una pestaña nueva a tamaño completo con el contenido.

que estoy haciendo mal?

gracias a todos

[zerokilled]

para hacer funcionar un popup en cualquier navegador, debees de olvidarte de VBScript ya que solo es interpretado por msie. yo realmente no se abslolutamente nada de VBScript pero creo que un codigo similar en javascript es como sigue:

Código javascript:

function opennewwindow(pagepath){
document.write("<script>window.open('", pagepath, 
"','RESULTADO','height=650, width=750, scrollbar=yes')</script>");
)
}
 

ahora bien, el modo que esta ventana se abre realmente esta determinado por las preferencias del usuario. por ejemplo, yo tengo configurado no esconder la barra de estado en Fx. asi sucesivamente cada preferencia afecta de una forma u otra y sobre ello no hay nada que podamos hacer.

tambien he notado que dependiendo de los parametros incluidos en window.open este abre una nueva pesta~na o ventana. si incluyes al menos el height y width debe abrir una ventana. cuando no sucede ya es preferencia del navegador.