Crear una página ASP - Secuencias de comandos sencillas
Tutorial creado por UnedHistoria. Extraido de: http://www.zonagratuita.com
23 de Agosto de 2005
ASP
17 - Secuencias de comandos sencillas
La siguiente secuencia de comandos ilustra las técnicas básicas que se utilizan en las secuencias de comandos ASP. Si no tiene experiencia en el desarrollo de aplicaciones o nunca ha escrito secuencias de comandos, éste es un buen lugar para empezar.
Elija un ejemplo en la siguiente lista:
• Variables: Muestra cómo crear y manipular variables en una secuencia de comandos ASP.
• Bucles: Proporciona un ejemplo de las tres construcciones más comunes para crear bucles, For
... Next, Do ... Loop y While ... Wend.
• Operadores condicionales: Ilustra el uso de los operadores condicionales, como If ... Then, en
las secuencias de comandos ASP.
• Matrices: Muestra cómo crear, administrar y tener acceso a matrices.
• Archivos de inclusión del servidor: Muestra el uso de los archivos de inclusión del servidor.
• Funciones y procedimientos: Muestra cómo crear y utilizar funciones y procedimientos en una
secuencia de comandos ASP.
Variables
Introducción
Todas las aplicaciones escritas a lo largo de la historia, independientemente del lenguaje de
programación empleado, han utilizado variables de algún tipo y las secuencias de comandos ASP no son una excepción. Tanto VBScript como JScript permiten crear y administrar variables de forma fácil y sencilla.
Cada lenguaje realiza de forma diferente la declaración de variables. JScript y VBScript son bastante flexibles en lo que respecta a las variables y su declaración. En VBScript, cualquier variable se considera automáticamente de tipo Variant si se declara inicialmente con la instrucción Dim. A cada variable se le asigna un subtipo, como Numeric y Array. JScript es parecido; la variable se declara inicialmente con la instrucción var. En general, ambos lenguajes tienden a realizar automáticamente gran parte de la administración de tipos de datos, incluida la conversión de tipos. De hecho, ni siquiera es necesario emplear las instrucciones Dim o var para utilizar una nueva variable; en sus respectivos lenguajes son opcionales.
Paseo por el código
Este ejemplo declara varios tipos diferentes de variables, realiza algunas operaciones sencillas en ellas y las muestra al explorador cliente con los delimitadores especiales de secuencias de comandos <% =...%>. Se asigna un entero a la variable intVariable, se suma a sí mismo y se envía el resultado al explorador cliente. A la variable StrVariable se le asigna el nombre, se agrega a Soto y se envía al explorador cliente. Del mismo modo se declaran o crean, inicializan, manipulan y muestran los valores booleanos y las fechas.
Observaciones
El último paso de la demostración de la variable de fecha es especialmente interesante. En VBScript, primero se asigna la variable a una cadena de fecha literal y después se muestra. Después se restablece y se asigna el valor devuelto por la función Now de VBScript, que devuelve la hora actual del sistema. El ejemplo de JScript utiliza la función Date de JScript para establecer el literal inicial, para lo que pasa parámetros a la función, y establecer después la fecha actual del sistema en la variable, sin pasar parámetros a la función.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Variable Sample</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Variable Sample</B></FONT><BR>
<HR>
<H3>Integer Manipulation</H3>
<%
'Declare variable.
Dim intVar
'Assign the variable an integer value.
intVar = 5
%>
<P><%= intVar %> + <%= intVar %> = <%= intVar + intVar %></P>
<HR>
<H3>String Manipulation</H3>
<%
'Declare variable.
Dim strVar
'Assign the variable a string value.
strVar = "Jemearl"
%>
<P>This example was done by <%= strVar + " Smith" %></P>
<HR>
<H3>Boolean Manipulation</H3>
<%
'Declare variable.
Dim blnVar
'Assign the variable a Boolean value.
blnVar = true
'Output message based on value.
If (blnVar) Then
Response.Write "<P>The Boolean value is True.</P>"
Else
Response.Write "<P>The Boolean value is False.</P>"
End If
%>
<HR>
<H3>Date and Time</H3>
<%
'Declare variable.
Dim dtmVar
'Assign the variable a value.
dtmVar = #08 / 27 / 97 5:11:42pm#
%>
<P>The date and time is <%= dtmVar %>
<%
'Set the variable to the web server date and time.
dtmVar = Now()
%>
<P>The <STRONG>system</strong> date and time is <%= dtmVar %></P>
</BODY>
</HTML>
Bucles
Introducción
Los bucles representan uno de los mecanismos más importantes de control de flujo en un lenguaje de programación. Las construcciones en bucle proporcionan la base de cualquier aplicación que deba realizar una tarea de forma repetitiva, como sumar 1 a una variable, leer un archivo de texto o procesar y enviar un mensaje de correo electrónico.
Paseo por el código
VBScript y JScript proporcionan varios mecanismos para realizar bucles. Este ejemplo demuestra las tres instrucciones más comunes para realizar bucles, For ... Next, Do ... Loop y While ... Wend. Estas tres instrucciones son ligeramente diferentes y la situación indicará cuál de las tres es la más indicada.
Sin embargo, para este ejemplo, cada tipo de instrucción de bucle se utiliza para realizar la misma tarea: imprimir un saludo cinco veces, cada una de ellas con una fuente mayor. En cada instrucción de bucle se inicializa la variable i y se define la condición de prueba, de forma que i nunca sea mayor que 5. La variable se incrementa en 1 unidad en cada iteración del bucle.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Looping</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Looping with ASP</B></FONT><BR>
<HR SIZE="1" COLOR="#000000">
<!-- Looping with a For loop. -->
<%
Dim intCounter
For intCounter = 1 to 5 %>
<FONT SIZE=<% = intCounter %>>
Hello World with a For Loop!<BR>
</FONT>
<% next %>
<HR>
<!-- Looping with a While...Wend loop. -->
<%
intCounter = 1
While(intCounter < 6) %>
<FONT SIZE=<% = intCounter %>>
Hello World with a While Loop!<BR>
</FONT>
<% intCounter = intCounter + 1 %>
<% wend %>
<HR>
<!-- Looping with a Do...While loop. -->
<%
intCounter = 1
Do While(intCounter < 6) %>
<FONT SIZE=<% =intCounter %>>
Hello World with a Do...While Loop!<BR>
</FONT>
<% intCounter = intCounter+1 %>
<% loop %>
</BODY>
</HTML>
Operadores condicionales
Introducción
Los operadores condicionales, junto con las variables y las construcciones de bucle, forman los pilares básicos de los lenguajes de programación y, por tanto, de las aplicaciones. Las aplicaciones basadas en Web que se implementan mediante secuencias de comandos ASP pueden aprovechar el control de flujo que proporcionan los operadores condicionales, así como la interactividad y la sofisticación de HTML.
Paseo por el código
Este ejemplo demuestra las instrucciones If ... Then o if ... else en VBScript y JScript, así como las
instrucciones Select ... Case y switch ... case, más complejas. La demostración de cada una de estas instrucciones realiza la misma tarea: enviar una página al explorador cliente con la fecha y la hora actuales y un saludo. El texto del saludo será "Buenos días" o "Buenas tardes", dependiendo de si en el reloj del sistema aparece a.m. o p.m.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Conditional Operator Sample</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Conditional Operator Sample</B></FONT><BR>
<HR SIZE="1" COLOR="#000000">
<!-- If...Then example -->
<%
Dim varDate
varDate = Date()
%>
<P>The date is: <%= varDate %></P>
<%
'Select Case statement to display a message based on the day of the month.
Select Case Day(varDate)
Case 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
Response.Write("<P>It's the beginning of the month.</P>")
Case 11, 12, 13, 14, 15, 16, 17, 18, 19, 20
Response.Write("<P>It's the middle of the month.</P>")
Case Else
Response.Write("<P>It's the end of the month.</P>")
End Select
%>
<P>The time is: <%= Time %></P>
<%
'Check for AM/PM, and output appropriate message.
If (Right(Time,2)="AM") Then
Response.Write("<P>Good Morning</P>")
Else
Response.Write("<P>Good Evening</P>")
End If
%>
</BODY>
</HTML>
Funciones y procedimientos
Introducción
Las funciones y los procedimientos proporcionan un método para evitar tener que escribir varias veces un mismo bloque de código cada vez que desee realizar una tarea determinada. Tanto VBScript como JScript permiten llamar a una función o a un procedimiento desde cualquier lugar de una secuencia de comandos. Este ejemplo demuestra cómo puede crear y utilizar estas herramientas en secuencias de comandos ASP.
Si no tiene ninguna función en la página ASP, el motor ASP se limita a procesar el archivo completo, de principio a fin, cada vez que lo pide un explorador cliente. Sin embargo, las funciones y los procedimientos se ejecutan sólo cuando se les llama, no con el resto del código.
En VBScript o JScript las funciones y los procedimientos se indican mediante la instrucción Function. Además, VBScript establece una diferencia entre una función que devuelve un valor y otra que no lo hace; la primera de ellas se indica con la instrucción Sub, que la identifica como una subrutina.
Paseo por el código
Este ejemplo define una función, PrintOutMsg, que toma como parámetros un mensaje y un número que especifica cuántas veces se escribirá el mensaje en el explorador cliente mediante el método Response.Write. Para este ejemplo, la función se limita a devolver al explorador cliente el número de veces que se imprimió el mensaje.
Observaciones
Es importante tener en cuenta el atributo RUNAT de la etiqueta <SCRIPT>. SI no se incluye, ASP
asumirá que se trata de una secuencia de comandos del cliente y devolverá el código al explorador para que lo procese. Esto haría que ASP no reconociera la llamada a la función PrintOutMsg, devolviera un error y anulara la ejecución.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
'Define Server Side Script Function.
Function PrintOutMsg(strMsg, intCount)
Dim i
'Output Message count times.
For i = 1 to intCount
Response.Write(strMsg & "<BR>")
Next
'Return number of iterations.
PrintOutMsg = intCount
End Function
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Functions</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Server Side Functions</B></FONT><BR>
<P>
The function "PrintOutMsg" prints out a specific message a set number of times.<P>
<%
'Store number of times function printed message.
Dim intTimes
'Call function.
intTimes = PrintOutMsg("This is a function test!", 4)
'Output the function return value.
Response.Write("<p>The function printed out the message " & intTimes & "
times.")
%>
</BODY>
</HTML>
Elija un ejemplo en la siguiente lista:
• Variables: Muestra cómo crear y manipular variables en una secuencia de comandos ASP.
• Bucles: Proporciona un ejemplo de las tres construcciones más comunes para crear bucles, For
... Next, Do ... Loop y While ... Wend.
• Operadores condicionales: Ilustra el uso de los operadores condicionales, como If ... Then, en
las secuencias de comandos ASP.
• Matrices: Muestra cómo crear, administrar y tener acceso a matrices.
• Archivos de inclusión del servidor: Muestra el uso de los archivos de inclusión del servidor.
• Funciones y procedimientos: Muestra cómo crear y utilizar funciones y procedimientos en una
secuencia de comandos ASP.
Variables
Introducción
Todas las aplicaciones escritas a lo largo de la historia, independientemente del lenguaje de
programación empleado, han utilizado variables de algún tipo y las secuencias de comandos ASP no son una excepción. Tanto VBScript como JScript permiten crear y administrar variables de forma fácil y sencilla.
Cada lenguaje realiza de forma diferente la declaración de variables. JScript y VBScript son bastante flexibles en lo que respecta a las variables y su declaración. En VBScript, cualquier variable se considera automáticamente de tipo Variant si se declara inicialmente con la instrucción Dim. A cada variable se le asigna un subtipo, como Numeric y Array. JScript es parecido; la variable se declara inicialmente con la instrucción var. En general, ambos lenguajes tienden a realizar automáticamente gran parte de la administración de tipos de datos, incluida la conversión de tipos. De hecho, ni siquiera es necesario emplear las instrucciones Dim o var para utilizar una nueva variable; en sus respectivos lenguajes son opcionales.
Paseo por el código
Este ejemplo declara varios tipos diferentes de variables, realiza algunas operaciones sencillas en ellas y las muestra al explorador cliente con los delimitadores especiales de secuencias de comandos <% =...%>. Se asigna un entero a la variable intVariable, se suma a sí mismo y se envía el resultado al explorador cliente. A la variable StrVariable se le asigna el nombre, se agrega a Soto y se envía al explorador cliente. Del mismo modo se declaran o crean, inicializan, manipulan y muestran los valores booleanos y las fechas.
Observaciones
El último paso de la demostración de la variable de fecha es especialmente interesante. En VBScript, primero se asigna la variable a una cadena de fecha literal y después se muestra. Después se restablece y se asigna el valor devuelto por la función Now de VBScript, que devuelve la hora actual del sistema. El ejemplo de JScript utiliza la función Date de JScript para establecer el literal inicial, para lo que pasa parámetros a la función, y establecer después la fecha actual del sistema en la variable, sin pasar parámetros a la función.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Variable Sample</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Variable Sample</B></FONT><BR>
<HR>
<H3>Integer Manipulation</H3>
<%
'Declare variable.
Dim intVar
'Assign the variable an integer value.
intVar = 5
%>
<P><%= intVar %> + <%= intVar %> = <%= intVar + intVar %></P>
<HR>
<H3>String Manipulation</H3>
<%
'Declare variable.
Dim strVar
'Assign the variable a string value.
strVar = "Jemearl"
%>
<P>This example was done by <%= strVar + " Smith" %></P>
<HR>
<H3>Boolean Manipulation</H3>
<%
'Declare variable.
Dim blnVar
'Assign the variable a Boolean value.
blnVar = true
'Output message based on value.
If (blnVar) Then
Response.Write "<P>The Boolean value is True.</P>"
Else
Response.Write "<P>The Boolean value is False.</P>"
End If
%>
<HR>
<H3>Date and Time</H3>
<%
'Declare variable.
Dim dtmVar
'Assign the variable a value.
dtmVar = #08 / 27 / 97 5:11:42pm#
%>
<P>The date and time is <%= dtmVar %>
<%
'Set the variable to the web server date and time.
dtmVar = Now()
%>
<P>The <STRONG>system</strong> date and time is <%= dtmVar %></P>
</BODY>
</HTML>
Bucles
Introducción
Los bucles representan uno de los mecanismos más importantes de control de flujo en un lenguaje de programación. Las construcciones en bucle proporcionan la base de cualquier aplicación que deba realizar una tarea de forma repetitiva, como sumar 1 a una variable, leer un archivo de texto o procesar y enviar un mensaje de correo electrónico.
Paseo por el código
VBScript y JScript proporcionan varios mecanismos para realizar bucles. Este ejemplo demuestra las tres instrucciones más comunes para realizar bucles, For ... Next, Do ... Loop y While ... Wend. Estas tres instrucciones son ligeramente diferentes y la situación indicará cuál de las tres es la más indicada.
Sin embargo, para este ejemplo, cada tipo de instrucción de bucle se utiliza para realizar la misma tarea: imprimir un saludo cinco veces, cada una de ellas con una fuente mayor. En cada instrucción de bucle se inicializa la variable i y se define la condición de prueba, de forma que i nunca sea mayor que 5. La variable se incrementa en 1 unidad en cada iteración del bucle.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Looping</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Looping with ASP</B></FONT><BR>
<HR SIZE="1" COLOR="#000000">
<!-- Looping with a For loop. -->
<%
Dim intCounter
For intCounter = 1 to 5 %>
<FONT SIZE=<% = intCounter %>>
Hello World with a For Loop!<BR>
</FONT>
<% next %>
<HR>
<!-- Looping with a While...Wend loop. -->
<%
intCounter = 1
While(intCounter < 6) %>
<FONT SIZE=<% = intCounter %>>
Hello World with a While Loop!<BR>
</FONT>
<% intCounter = intCounter + 1 %>
<% wend %>
<HR>
<!-- Looping with a Do...While loop. -->
<%
intCounter = 1
Do While(intCounter < 6) %>
<FONT SIZE=<% =intCounter %>>
Hello World with a Do...While Loop!<BR>
</FONT>
<% intCounter = intCounter+1 %>
<% loop %>
</BODY>
</HTML>
Operadores condicionales
Introducción
Los operadores condicionales, junto con las variables y las construcciones de bucle, forman los pilares básicos de los lenguajes de programación y, por tanto, de las aplicaciones. Las aplicaciones basadas en Web que se implementan mediante secuencias de comandos ASP pueden aprovechar el control de flujo que proporcionan los operadores condicionales, así como la interactividad y la sofisticación de HTML.
Paseo por el código
Este ejemplo demuestra las instrucciones If ... Then o if ... else en VBScript y JScript, así como las
instrucciones Select ... Case y switch ... case, más complejas. La demostración de cada una de estas instrucciones realiza la misma tarea: enviar una página al explorador cliente con la fecha y la hora actuales y un saludo. El texto del saludo será "Buenos días" o "Buenas tardes", dependiendo de si en el reloj del sistema aparece a.m. o p.m.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<HTML>
<HEAD>
<TITLE>Conditional Operator Sample</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Conditional Operator Sample</B></FONT><BR>
<HR SIZE="1" COLOR="#000000">
<!-- If...Then example -->
<%
Dim varDate
varDate = Date()
%>
<P>The date is: <%= varDate %></P>
<%
'Select Case statement to display a message based on the day of the month.
Select Case Day(varDate)
Case 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
Response.Write("<P>It's the beginning of the month.</P>")
Case 11, 12, 13, 14, 15, 16, 17, 18, 19, 20
Response.Write("<P>It's the middle of the month.</P>")
Case Else
Response.Write("<P>It's the end of the month.</P>")
End Select
%>
<P>The time is: <%= Time %></P>
<%
'Check for AM/PM, and output appropriate message.
If (Right(Time,2)="AM") Then
Response.Write("<P>Good Morning</P>")
Else
Response.Write("<P>Good Evening</P>")
End If
%>
</BODY>
</HTML>
Funciones y procedimientos
Introducción
Las funciones y los procedimientos proporcionan un método para evitar tener que escribir varias veces un mismo bloque de código cada vez que desee realizar una tarea determinada. Tanto VBScript como JScript permiten llamar a una función o a un procedimiento desde cualquier lugar de una secuencia de comandos. Este ejemplo demuestra cómo puede crear y utilizar estas herramientas en secuencias de comandos ASP.
Si no tiene ninguna función en la página ASP, el motor ASP se limita a procesar el archivo completo, de principio a fin, cada vez que lo pide un explorador cliente. Sin embargo, las funciones y los procedimientos se ejecutan sólo cuando se les llama, no con el resto del código.
En VBScript o JScript las funciones y los procedimientos se indican mediante la instrucción Function. Además, VBScript establece una diferencia entre una función que devuelve un valor y otra que no lo hace; la primera de ellas se indica con la instrucción Sub, que la identifica como una subrutina.
Paseo por el código
Este ejemplo define una función, PrintOutMsg, que toma como parámetros un mensaje y un número que especifica cuántas veces se escribirá el mensaje en el explorador cliente mediante el método Response.Write. Para este ejemplo, la función se limita a devolver al explorador cliente el número de veces que se imprimió el mensaje.
Observaciones
Es importante tener en cuenta el atributo RUNAT de la etiqueta <SCRIPT>. SI no se incluye, ASP
asumirá que se trata de una secuencia de comandos del cliente y devolverá el código al explorador para que lo procese. Esto haría que ASP no reconociera la llamada a la función PrintOutMsg, devolviera un error y anulara la ejecución.
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
'Define Server Side Script Function.
Function PrintOutMsg(strMsg, intCount)
Dim i
'Output Message count times.
For i = 1 to intCount
Response.Write(strMsg & "<BR>")
Next
'Return number of iterations.
PrintOutMsg = intCount
End Function
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Functions</TITLE>
</HEAD>
<BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
<!-- Display header. -->
<FONT SIZE="4" FACE="ARIAL, HELVETICA">
<B>Server Side Functions</B></FONT><BR>
<P>
The function "PrintOutMsg" prints out a specific message a set number of times.<P>
<%
'Store number of times function printed message.
Dim intTimes
'Call function.
intTimes = PrintOutMsg("This is a function test!", 4)
'Output the function return value.
Response.Write("<p>The function printed out the message " & intTimes & "
times.")
%>
</BODY>
</HTML>
Valora este capítulo:
Autor y licencia de 'Crear una página ASP - Secuencias de comandos sencillas'
|
Opiniona sobre 'Crear una página ASP - Secuencias de comandos sencillas' (20)
Tu nombre debe tener tres caracteres como mínimo.
Es necesario que te des de alta con una cuenta de correo válida.
Es necesario que te des de alta con una cuenta de correo válida.
El contenido del título de tu opinión debe tener tres caracteres como mínimo.
Es obligatorio que selecciones una valoración del recurso.
El contenido del comentario de tu opinión debe tener tres caracteres como mínimo.
Opina sobre este tutorial |
Wikis relacionados con 'Crear una página ASP - Secuencias de comandos sencillas'
La organización funcional y burocratizada ha utilizado el conocimiento para codificarlo en procedimientos y rutinas,...
Más »
A lo largo de este libro se desarrollarán las bases para que una vez llegado...
Más »
Para aprender los comandos más útiles.
Revisamos varios lenguajes de programación que son usados en la actualidad para hacer páginas Web....
Más »
Revisamos varios lenguajes de programación que son usados en la actualidad para hacer páginas Web....
Más »
