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)."
%>
