计算ASP页面执行时间

<%Dim StartTime
StartTime = Timer()
'写在网站的前面

'写在网站的尾部
Dim EndTime
EndTime = Timer()
Response.Write "页面执行 "&FormatNumber(EndTime - StartTime ,3 ,-1)&"毫秒"%>