Interesante tip sobre como gestionar la sobrecarga en memoria que el código ASP puede llegar a generar. Una técnica simple para asegurarse de que en documentos con cientos de líneas de código se cierran todos los recordsets, las bases de datos y los objetos de un modo correcto.

Controlar el cierre de recordsets en ASP » »

Este script mide el tiempo de procesamiento de nuestro asp. El script consta de dos partes, una debe colocarse al comienzo de la página y la otra al final

<%
////COLOCAR AL PRINCIPIO////
Dim comienzo
comienzo = Timer()
Dim tt 
Do While tt < 30000
  tt = tt + 1 
Loop 
%>


<% 
////COLOCAR AL FINAL////
Dim final 
final = Timer() 
Response.Write "Carga en " & final-comienzo & " segundos = "
Response.Write " (" & (final-comienzo)*1000 & " millisegundos)."
%> 

Este pequeño código muestra todas las variables de session activas en la aplicación en la que estás trabajando. Se puede abrir en una ventana nueva -o pestaña- y en otra ir ejecutando la página ASP. Al actualizar, verás los valores de las variables que se han ido incorporando.

<%
dim i
dim j
j=Session.Contents.Count
Response.Write("Variables de Session: " & j&"")
For i=1 to j
	Response.Write(Session.Contents(i) & "")
Next
%>

Sintaxis:

Response.Write (argumento)

Este método devuelve una cadena. El argumento puede ser escrito como una cadena, un número o también puede ser el nombre de una variable. El argumento no puede contener la combinación de caracteres %>

Ejemplo:

<%
Response.Write "Hola Mundo"
%>

Salida:

Hola Mundo

La función InStr devuelve la posición de la primera concurrencia de una cadena dentro de otra. La función puede devolver los siguientes valores:

- Si string1 es "" - InStr devuelve 0
- Si string1 es Null - InStr devuelve Null
- Si string2 es "" - InStr devuelve start
- Si string2 es Null - InStr devuelve Null
- Si string2 no se encuentra - InStr devuelve 0
- Si string2 es encontrado dentro de string1 - InStr devuelve la posición en que la coincidencia ha sido encontrada
- Si start > Len(string1) - InStr devuelve 0

InStr([start,]string1,string2[,compare])

start (opcional). Especifica el punto de partida para la búsqueda. Por defecto empieza en el primer caracter. El parámetro es requerido si 'compare' ha sido especificado.
string1 (obligatorio). La cadena donde será buscado.
string2 (obligatorio). La cadena a buscar.
compare (opcional). Especifica el tipo de comparación. Por defecto es 0.
Puede tener uno de los siguientes valores:

* 0 = vbBinaryCompare - Comparación binaria
* 1 = vbTextCompare - Comparación textual.

dim txt,pos
txt="Esto es una frase de ejemplo !"
pos=InStr(txt,"frase")
Response.write(pos)

13