计算在ASP的两个时间差DateDiff函数
二次时差计算的作用******************************
| |功能timediff(sbegin,发送)
两个| |函数来计算时间差,可直接用于不改变
| |作者:machinecat 2001 / 10 / 26
******************************
******************************
注意:首先,你需要确定的sbegin尺寸由用户输入发送。
两者之间的时间差可以通过DataDiff函数获得,而不需要一个复杂的时间转换。
******************************
功能timediff(sbegin,发送)
昏暗的ihourb,iminuteb,isecondb,iminisecondb
昏暗的ihoure,iminutee,iseconde,iminiseconde
昏暗的dtimeb,dtimee,dtimediff
昏暗的ihour,iminute,32,iminisecond
ihourb = CLNG(左(sbegin,2))
iminuteb = CLNG(MID(sbegin,4, 2))
isecondb = CLNG(MID(sbegin,7, 2))
iminisecondb = CLNG(MID(sbegin,10, 4))
ihoure = CLNG(左(发送,2))
iminutee = CLNG(MID(发送,4, 2))
iseconde = CLNG(MID(发送,7, 2))
iminiseconde = CLNG(MID(发送,10, 4))
dtimeb = ihourb * 3600 + iminuteb * 60 + isecondb + iminisecondb / 1000
dtimee = ihoure * 3600 + iminutee * 60 + iseconde + iminiseconde / 1000
dtimediff = dtimee - dtimeb
ihour = int(dtimediff / 3600)
dtimediff = dtimediff - ihour * 3600
iminute = int(dtimediff / 60)
dtimediff = dtimediff - iminute * 60
32 = int(dtimediff)
dtimediff = dtimediff - Int(dtimediff)
iminisecond = dtimediff
timediff = ihour 小时iminute分钟formatnumber 32(iminisecond,3)二
端功能