答案:函数名:GetTimeOver
'作 用:页面执行时间
'参 数:flag ---显示时间单位1=秒,否则毫秒
'****************************************************
Public Function GetTimeOver(flag)
Dim EndTime
If flag = 1 Then
EndTime=FormatNumber(Timer() - starTime, 6, true)
getTimeOver = " <span style=""font-family:Arial, Helvetica, sans-serif;"">Processed in " & EndTime & " second(s)</span>"
Else
EndTime=FormatNumber((Timer() - starTime) * 1000, 3, true)
getTimeOver =" 页面执行时间: " & EndTime & " 毫秒"
End If
End function
'调用方法
GetTimeOver(1) '页面执行开始时间
GetTimeOver(1) '页面共用了多长时间
上一个:404错误的处理方式
下一个:ASP.NET学习十天通之一