Diferença entre horas pré-definidas

Uma maneira bem simples de calcular diferenças entre horários.
Eu bati neste problema quando montava um sisteminha para controlar meus horarios ( tipo consultor ).
Assim q ele estiver pronto vou colocar para Download.
Qualquer melhoria, não esqueçam de postar.

<%

function horas(intervalo,Entrada01,Saida01,Entrada02,Saida02)

 'pega a diferença em segundos
 dia01 = DateDiff (intervalo,Entrada01,Saida01)
 dia02 = DateDiff (intervalo,Entrada02,Saida02)

 'faz a somatória dos segundos
 totalSegundos = dia01 - dia02

 'separa horas:minutos do total
 segundos = (totalSegundos) mod  60
 minutos = (( totalSegundos - segundos) / 60) mod 60
 horas = int((totalSegundos) / 3600)
 
 response.write horas &":"&minutos&":"&segundos
end function

response.write horas("s","08:59:0","18:46:00","12:00:00","13:00:00")

%>

Esta matéria foi postada originalmente no ASP4Developers por Ismael Nobre (site), que na época era "Analista.
Quer me contratar ?
Cel. 96420687". Hoje, vai saber...