快捷導(dǎo)航

ASP顯示頁(yè)面執(zhí)行時(shí)間的方法

更新時(shí)間：2015年10月08日 11:14:50 投稿：lijiao

這篇文章主要介紹了ASP顯示頁(yè)面執(zhí)行時(shí)間的方法，在本地測(cè)試一下輸出頁(yè)面需要多少時(shí)間，需要的朋友可以參考下

在 ASP 程序中，要想計(jì)算一個(gè)頁(yè)面從執(zhí)行開(kāi)始到執(zhí)行結(jié)束需要花費(fèi)多少時(shí)間是非常簡(jiǎn)單的！我們知道，ASP 是解釋型語(yǔ)言，也就是說(shuō)它的執(zhí)行過(guò)程是從頁(yè)面的開(kāi)端到頁(yè)面的尾端，我們只需要計(jì)算一個(gè)時(shí)間差就可以得到頁(yè)面執(zhí)行的時(shí)間了。
下面看看是怎么實(shí)現(xiàn)的，分為三步！
第一步：在頁(yè)面的頭部定義一個(gè)開(kāi)始時(shí)間的變量，并且獲取當(dāng)前時(shí)間

<%
Dim StarTime
StarTime = Timer()
%>

第二步：在頁(yè)面的尾部定義一個(gè)結(jié)束時(shí)間的變量，并且獲取當(dāng)前時(shí)間

<%
Dim EndTime
EndTime = Timer()
%>

第三步：計(jì)算兩個(gè)時(shí)間差，并輸出頁(yè)面
當(dāng)前頁(yè)面執(zhí)行的時(shí)間：<%=FormatNumber((EndTime - StarTime) * 1000, 3)%>毫秒
是不是很簡(jiǎn)單？下面給出ASP頁(yè)面執(zhí)行時(shí)間的完整實(shí)例代碼：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim StarTime
StarTime = Timer()
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>獲取ASP頁(yè)面執(zhí)行的時(shí)間</title>
</head>
  
<body>
  <div align="center">
    <img src="xc_images/logo.jpg" />
  </div>
  <div align="center" style="width:400px;">
    <%
    for i = 1 to 10000
      '循環(huán)花費(fèi)一些花間！
    next
    %>
  </div>
  <br>
</body>
</html>
<%
Dim EndTime
EndTime = Timer()
%>
<div align="center">當(dāng)前頁(yè)面執(zhí)行的時(shí)間：<%=FormatNumber((EndTime - StarTime) * 1000, 3)%>毫秒</div>