250807.




Muchas veces queremos saber si es una página "pesada", si tardará mucho en cargar, si los usuario soportarán la espera hasta que nuestra página se digne a bajar a sus navegadores... Aqui les presento un script para calcular en milisegundos cuanto tarda y comparar todas sus páginas. Consiste en lanzar un cronómetro al comenzar la página y detenerlo al finalizarla... y presentar los datos por pantalla para leerlos. Es algo simple y muy bueno!

La carga se completo en 0.015625 segundos = (15.625 milliseconds).


Es obvio que 1000 milisegundos son 1 segundo ¿no?... Bueno, aqui está el código para calcular eso...
Para ver que funciona correctamente puden aumentar el número del bucle, agregándole ceros... por ejemplo a 3000000.

<%
'Comenzamos el cronómetro.
starttime = Timer()
'Toda la página a continuacion...
Do While tt < 30000
tt = tt + 1
Loop
'Lo que sigue va al final de la página.
'Nos fijamos cuanto tiempo lleva el cronómetro y lo guardamos el tiempo final.
endtime = Timer()
'Mostramos los resultados obtenidos.
Response.Write "La carga se completo en " & endtime-starttime & " segundos = "
Response.Write " (" & (endtime-starttime)*1000 & " milliseconds)."
%>