VBScript 12

[Indice]

El objeto Window

Es el objeto básico, y representa en sí mismo al propio IE. Al ser el elemento principal del modelo de objetos, para referirse a sus propiedades, métodos o eventos, no es necesario referenciarlo específicamente.

El objeto Window tiene 11 propiedades, 8 métodos y 2 eventos.

PROPIEDADES

Name Devuelve un string cuyo contenido es el nombre de la ventana actual, siempre que la ventana haya sido abierta asignándole específicamente un nombre. Por defecto las ventanas no tienen nombre, y por tanto Name no tiene contenido (Empty). Por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
        Document.Write "El nombre de esta ventana es: " & Name
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Y después de pulsar el botón "Prueba" del formulario solamente obtendremos:

El nombre de esta ventana es:

Como ya se ha dicho, para que Name devuelva un valor es necesario abrir la ventana asignándole un nombre. Para ello puedes utilizar el método Open de este mismo objeto (Window) que se describe más abajo.

Parent

Self

Top

Location

Status Devuelve o establece el contenido de la línea de status del navegador, situada en la esquina inferior izquierda de la ventana. Su valor por defecto es "Listo". Para cambiar su contenido, por ejemplo, con la frase "Esto es una prueba", se escribe:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
     Status = "Esto es una prueba"
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Y después de pulsar el botón "Prueba" del formulario, obtendremos en la línea de estatus del navegador:

DefaultStatus Hace lo mismo que Status, y aunque por su nombre lo parezca, no sirve para cambiar el valor por defecto de la línea de status, que es "Listo".

Frames

History

Navigator

Document

MÉTODOS

Alert Muestra un mensaje de alerta. Es parecido a la función MsgBox(), pero a diferencia de ésta, no se puede parametrizar ni devuelve valores. Por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
     Alert "Esto es una prueba"
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Y después de pulsar el botón "Prueba" del formulario, obtendremos el mensaje:

Confirm Muestra un cuadro de diálogo con dos botones. Es parecido a la función MsgBox(), pero a diferencia de ésta, no se puede parametrizar, aunque sí devuelve dos valores booleanos (True o False) dependiendo del botón pulsado por el usuario. Por ejemplo:


<HTML>
<HEAD>
<TITLE>Prueba de mensaje</TITLE>
</HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">
    <INPUT TYPE="Text" NAME="Campo1">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
        Formulario1.Campo1.value = Confirm("¿Quieres continuar?")
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Después de pulsar el botón "Prueba" del formulario tendremos esto:

Y después de pulsar el botón "Aceptar" del cuadro de diálogo tendremos esto:

Fíjate en que el valor devuelto es "Verdadero" en lugar de "True". Para capturar los valores booleanos no se deben utilizar las frases que aparecen aquí, que han sido convertidas, sino que se debe evaluar directamente el valor booleano devuelto por el objeto, sin conversiones que dependan de la lengua utilizada por el navegador. Así:


       If Confirm ("Quieres continuar?") Then
           Formulario1.campo1.value= "Ha pulsado Aceptar"
          Else
           Formulario1.campo1.value= "Ha pulsado Cancelar"
       End If

Prompt Muestra un cuadro de diálogo con dos botones y un campo de texto. Su funcionamiento es muy parecido a la función InputBox(), pero a diferencia de ésta, no se puede parametrizar. Sea por ejemplo:


<HTML>
<HEAD>
<TITLE>Prueba de mensaje</TITLE>
</HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">
    <INPUT TYPE="Text" NAME="Campo1">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
        Formulario1.Campo1.value = Prompt("Escribir un valor", "")
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Después de pulsar el botón "Prueba" del formulario tendremos esto:

En el ejemplo, después de escribir un texto cualquiera y pulsar el botón "Aceptar", lo escrito será recibido por Campo1, pero si se pulsa Cancelar, a diferencia de la función InputBox() que devolvería Empty, lo que se recibe es Null

Open[url, name, features] Permite abrir una nueva ventana en la que se está ejecutando una nueva instancia del IE. Opcionalmente, también permite definir las características que tendrá el nuevo navegador, como son qué página mostrará, el nombre de la ventana (utilizado por el objeto Name) y el aspecto que ofrecerá el navegador. Sea por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
     open "http://sestud.uv.es/manual.esp/", "Prueba", _
    "width=300, height=300, location=no, status=yes, toolbar=no, " & _
    "menubar=no, scrollbars=no, resizable=no, left=100, top=100"
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Y después de pulsar el botón "Prueba" del formulario, obtendremos una nueva ventana con esta apariencia:

Close Cierra la ventana actual. Por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
        close
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

SetTimeout instrucciones, espera Ejecuta el código VBScript contenido en instrucciones después de transcurrido el tiempo, en milisegundos, indicado por espera. Sea por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">
    <INPUT TYPE="Text" NAME="Campo1">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
     SetTimeout "Formulario1.Campo1.value = Time()", 2000"
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

Después de pulsar el botón "Prueba" del formulario, y transcurridos dos segundos, obtendremos:

ClearTimeout(identificador) Después de haber utilizado el método SetTimeout() anterior, VBScript mantiene memorizada la evaluación que realizó del parámetro instrucciones. Si en algun punto del programa es necesario repetir esa evaluación en lugar de utilizar la ya realizada, es preciso inicializarla previamente. Para ello se utiliza ClearTimeout(identificador). Para poder hacerlo, es necesario que el método SetTimeout() haya sido invocado mediante un identificador. Así:

identificador=setTimeout('mensaje()', 2000)">

Y para inicializar la evaluación y poder realizarla de nuevo:

clearTimeout(identificador)

Evidentemente en este ejemplo no tiene sentido inicializar nada, ya que se trata de un mensaje fijo, pero este método es imprescindible si las instrucciones ejecutadas por setTimeout() son expresiones numéricas variables o contadores de tiempo, como en el ejemplo anterior.

Navigate Navega hasta una nueva página en la misma ventana. Por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE></HEAD>
<BODY>

<FORM NAME="Formulario1">
    <INPUT TYPE="Button" NAME="Boton1" VALUE="Prueba">

<SCRIPT FOR="Boton1" EVENT="onClick" LANGUAGE="VBScript">
  <!--
     Navigate "http://sestud.uv.es/manual.esp"
  -->
</SCRIPT>
</FORM>

</BODY>
</HTML>

EVENTOS

OnLoad Como su nombre indica, se produce cuando el IE carga una página. Por ejemplo:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE>
<SCRIPT LANGUAGE="VBScript">
  <!--
     Sub Prueba
         Document.Write "Prueba de evento OnLoad"
     End Sub
  -->
</SCRIPT>
</HEAD>
<BODY OnLoad="Prueba">

</BODY>
</HTML>

Y este sería el resultado:

Prueba de evento OnLoad

OnUnload Funciona justo al contrario que el anterior: se activa cuando el navegador descarga la página actual, por ejemplo al intentar ir a otra. En ese momento, se dispara el evento. El siguiente ejemplo lleva a una página predeterminada siempre que se intenta abandonar la activa:


<HTML>
<HEAD><TITLE>Objetos del IE</TITLE>
<SCRIPT LANGUAGE="VBScript">
  <!--
     Sub Prueba
         Navigate "http://sestud.uv.es/manual.esp"
     End Sub
  -->
</SCRIPT>
</HEAD>
<BODY OnUnload="Prueba">

     De esta página no es fácil salir.

</BODY>
</HTML>