第一次写ASP类,实现功能:分段统计程序执行时间,输出统计表等。
程序代码:
以下为引用的内容: Class ccClsProcessTimeRecorder ''''ASP程序代码执行时间统计类 Private ccInti,ccIntNonceTime,ccIntDecimal Private ccIntStartTime,ccIntEndTime,ccIntNow,ccIntNonce Private ccStrInterval,ccStrEvent,ccStrTime,ccStrStatisticLog,ccStrFormatInterval Private ccArrEvent,ccArrTime 中国站长.站 Private Sub Class_Initialize ccStrInterval = "|" ''''默认分隔符 ccIntDecimal = 4 ''''小数点后位数 ccStrEvent = "" ccStrTime = "" ccStrFormatInterval = " " & vbCrLf ccIntStartTime = Timer ccIntNow = ccIntSt
|