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

%
For I = 1 to 10
Response.write "随风起舞(www.intels.net)时尚咨询的个人网站欢迎您!" I "br>"
Next
%>

br>您一共循环了显示了%=(I - 1) %>次.br>

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

好了，下面就是我们的ASP程序执行的结果：

Initial_Time =[80801.00]
随风起舞(www.intels.net)时尚咨询的个人网站欢迎您!1
随风起舞(www.intels.net)时尚咨询的个人网站欢迎您!2
...

随风起舞(www.intels.net)时尚咨询的个人网站欢迎您!10
您一共循环了显示了10次.
Final_Time =[80801.00]
It took [0.00] seconds to load this page. 

[1]