Código fuente de 'Abre ventana emergente.asp'
<html>
<head>
<title>Abre ventana emergente - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>
<body style="font-family: Arial; font-size: 9pt">
<center><b><font face="Arial" size="3">Abre ventana emergente</font></b></center><br><br>
Aquí tienes un código VBscript que permite abrir con un botón una ventana popup (emergente).
<br>
Además es un ejemplo del evento <i>B1_OnClick</i>.
Es decir una función que se desencadena al pulsar el botón B1
<SCRIPT Language = "vbscript">
Sub B1_OnClick()
Window.open "http://www.astalaweb.com","fastftp","toolbar=0,location=0,status=0,menubar=0,scrollbars=1,resizable=1,width=403,height=250"
B1.Value = "¡Fichero descargado! "
End Sub
</SCRIPT>
<form method="POST" action="Nueva ventana.asp">
<p align="center">
<input type="button" value="Abre ventana emergente" name="B1"></p>
</p>
</form>
</body>
</html>