Cerrar Ventana

[larrea]

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