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