
03/08/2002, 01:46
|
| | Fecha de Ingreso: julio-2002
Mensajes: 50
Antigüedad: 22 años, 9 meses Puntos: 0 | |
Re: Cerrar Ventana Hola
Te envío este código que creo que te servira para realizar lo que quieres.
Función en VBScript
-----------------------------------------
<SCRIPT language=VBScript>
<!--
Option Explicit
' ventanas
Dim miVentana
Sub AbreVentana()
Dim URL
Dim propiedades
URL = "autor/autor.htm"
propiedades = "fullscreen=no, channelmode=no, toolbar=no, location=no, directories=no, status=yes, scrollbars=no, resizable=no, width=340, height=240, top=0, left=0"
Set miVentana = Window.Open( URL, "Ficha", propiedades )
End Sub
Sub CierraVentana()
miVentana.close()
End Sub
-->
</SCRIPT>
-------------------------------------------
<FORM>
<CENTER><INPUT onclick=AbreVentana() type=button value="Abrir Ventana">
<INPUT onclick=CierraVentana() type=button value="Cerrar Ventana">
</FORM>
Tengo otro realizado en Javascript si lo encuentro tambien te lo envio
Un Saludo |