<%
//时间差计算函数
function timediff(a,b)
s=DateDiff("s",a,b) //返回两个时间相差多少秒
d=Fix(s/3600/24)
h=fix((s/3600-d*24))
m=fix((s/3600-d*24)*60-h*60)
ns=fix(((s/3600-d*24)*60-h*60-m)*60)
response.Write d&"天"
response.Write " "&h&"小时"
response.Write " "&m&"分钟"
response.Write " "&ns&"秒"
end function
%>