Vemos detenidamente los procedimientos en VBScript y algún ejemplo de su uso.
Decíamos que un procedimiento era una subrutina que se llamaba y realizaba
acciones, pero que no devolvía ningún valor y por lo tanto, no era posible
utilizarla dentro de una expresión.
Veamos algún ejemplo de procedimiento. Es una subrutina que
escribe en la barra de estado un mensaje. No es muy complicada, pero tal como la
presentamos aquí no se debería hacer, puesto que utilizamos un bucle vacío para
que el navegador esté un poco más lento y el texto salga poco a poco. En lugar
de ese bucle deberíamos utilizar una función llamada setTimeout, pero no
deseamos introducirla ahora.
|
sub
muestraAbajo(texto) dim i for i=0 to len(texto) dim actual actual = left(texto,i) window.status = actual dim j 'bucle para ralentizar al navegador debería utilizarse la función setTimeOut for j=0 to 20000 j = j next next end sub |
Este ejemplo utiliza además varias funciones de
cadenas de caracteres, esperamos que no represente mucho problema para
entenderlo. Básicamente es un bucle que va recorriendo toda la cadena de
caracteres que recibe por parámetro. A medida que se realiza el bucle se
va creando una subcadena de caracteres de la parte izquierda de la cadena
original, que cada vez es más larga. Luego se imprime esa cadena en la barra de
estado del navegador. Entre ejecución y ejecución del bucle se realiza un
retardo, en el segundo bucle for que se debería realizarse con un
setTimeout.
Podemos ver a continuación cómo se colocaría un botón en la página que llamase a este procedimiento.
|
<HTML> <P> |
Se puede ver el ejemplo en una página aparte.
Miguel Angel Alvarez
Fundador de DesarrolloWeb.com y la plataforma de formación online EscuelaIT. Com...