计算两个时间之间的差值

[shrockey]

2005-11-22 13:28:04　
2005-11-22 15:17:02

如何计算出两个时间之间相差几秒，几分(如果有分的话),几时(如果有时的话),几天(如果有天的话)

[lnboy1003]

DateDiff (I , D1 , D2[,FW[,FY]]) 计算两个日期之间的期间。
I ：设定两个日期之间的期间计算之单位。譬如 >I="m" 表示计算的单位为月。 >I 的设定值如：
yyyy > Year 年
q Quarter 季
m Month 月
d Day 日
w Weekday 星期
h Hour 时
m Minute 分
s Second 秒
D1 ,D2：计算期间的两个日期表达式，若 >date1 较早，则两个日期之间的期间结果为正值；若 >date2 较早， 则结果为负值。
FW ：设定每周第一天为星期几， 若未设定表示为星期天。 >FW 的设定值如下：
0 使用 >API 的设定值。
1 星期天
2 星期一
3 星期二
4 星期三
5 星期四
6 星期五
7 星期六
FY ：设定一年的第一周， 若未设定则表示一月一日那一周为一年的第一周。 >FY 的设定值如下：
0 使用 >API 的设定值。
1 一月一日那一周为一年的第一周
2 至少包括四天的第一周为一年的第一周
3 包括七天的第一周为一年的第一周 例子： DateDiff ("d","25-Mar-99 ","30-Jun-99 ")
结果： 97
说明：显示两个日期之间的期间为 97 天

[yongz_0]

<script language=vbs>
function check(t1,t2)
a=t1
b=t2
c=datediff("s",a,b)
d=int(c/86400) '天
e=c-(d*86400) '减掉天后剩下的秒数
f=int(e/3600) '小时
g=e-(f*3600) '减掉小时后剩下的秒数
h=int(g/60) '分
i=g-(h*60) '减掉分后剩下的秒数
msgbox ("时间差是:"& d &"天" & f &"小时"& h &"分"& i &"秒")
end function

call check("2005-11-22 13:28:04","2005-11-22 15:17:02")
</script>

[chy018]

几秒 DateDiff ("s","2005-11-22 13:28:04","2005-11-22 15:17:02")
几分 DateDiff ("m","2005-11-22 13:28:04","2005-11-22 15:17:02")
几小时 DateDiff ("h","2005-11-22 13:28:04","2005-11-22 15:17:02")
几天 DateDiff ("d","2005-11-22 13:28:04","2005-11-22 15:17:02")