计算ASP页面的载入时间

<%
Dim varInitial_Time
varInitial_Time = Timer
Response.Write "Initial_Time =[" & varInitial_Time & "]<br>"
%>


<% @#Start ASP Script Tag
For I = 1 to 10
Response.write "Hello World Take " & I & "<br>"
Next
@#End ASP Script Tag %>
<!-- Start: HTML--><br>You looped <%=(I - 1) %> times.<br><!-- End: HTML-->

<%
Dim varFinal_Time
varFinal_Time = Timer
Response.Write "Final_Time =[" & varFinal_Time & "]<br>"


Your ASP Script Results will be Displayed in the box below


--------------------------------------------------------------------------------

Initial_Time =[81105.81]
Hello World Take 1
Hello World Take 2
Hello World Take 3
Hello World Take 4
Hello World Take 5
Hello World Take 6
Hello World Take 7
Hello World Take 8
Hello World Take 9
Hello World Take 10

You looped 10 times.
Final_Time =[81105.81]
It took [0.00] seconds to load this page.  
 

原文转自：http://www.ltesting.net