作者:眼泪--保持微笑_572_205 | 来源:互联网 | 2023-05-19 15:49
我需要读取数据库的记录,然后逐条计算,由于记录很多,全部计算完毕可能需要很长时间。我就想统计这段代码的执行时间。计划在开始的时候取当前时间,然后在代码结束时再取一次当前时间两个时间相减之后,格式化
我需要读取数据库的记录,然后逐条计算,由于记录很多,全部计算完毕可能需要很长时间。我就想统计这段代码的执行时间。
计划在开始的时候取当前时间,然后在代码结束时再取一次当前时间两个时间相减之后,格式化成“时:分:秒”的形式。
由于我对Vbscript的时间函数不太清楚,所以请教各位高手:
1、上述计划可行否?如果可行,如何实现这个功能?
2、如果不可行,那么,怎么才能正确完成这个任务呢?
9 个解决方案
应该是可行的
详细方法看各个论坛里的搜索功能,基本都有时间统计的
具体如何实现啊?我不太懂Vbscript的时间函数,干着急啊。在CSDN搜索也收获甚少。
dim t1,t
t1=timer
dim h,m,s
'------------------
' do some thing for a long time
'--------------------
t=timer-t1
h=(t \3600)
m=(t-h*3600)\60
s=t-h*3600-m*60
msgbox cstr(h)&"小时"&cstr(m)&"分钟"&cstr(s)&"秒钟"
先在程序开始放一个变量得到当前时间
再在程序结束放一个变量得到当前时间
然后相减
楼上几位说的都不完整噢. 程序执行一般都不到1秒的.都是以毫秒来计的!
vbsBegin = Timer()
....
这里是你的费时的代码
....
vbsEnd = Timer()
document.write "vbs做完这件事需要" & (vbsEnd - vbsBegin) * 1000 & "豪秒
"
谢谢各位的关注,我一开始用Time函数,后来用Now函数,都不行,就是没有想到用Timer函数。