Restar dos horas

15/01/2004 - 10:20 por José Carlos | Informe spam
Hola a todos.

¿Cómo puedo restar dos horas del tipo 10:20 para que la resta me salga con
el mismo formato?

He intentado con:

dim h
h = datediff("n",horainicio,horafin)

Pero claro me calcula la diferencia en minutos, es decir, (20) lo que yo
necesito es que devuelva (00:20)

¿Cómo podría hacer esto?

Gracias.

Saludos.
José Carlos
www.siadv.com
 

Leer las respuestas

#1 Miguel González
15/01/2004 - 11:13 | Informe spam
Hola JoseCarlos, prueba, por ejemplo, con:

<%
Dim horainicio, horafin, minutos, horas, resultado
horainicio = CDate("10:44")
horafin = CDate("14:12")
If horainicio < horafin Then
minutos = DateDiff("n",horainicio,horafin)
Else
minutos = DateDiff("n",horafin,horainicio)
End If
horas = minutos\60
minutos = minutos - (horas * 60)
resultado = horas & ":" & minutos
Response.Write Replace(FormatDateTime(CDate(resultado), 4), ".", ":")
%>

Saludos!
Miguel

"José Carlos" escribió en el mensaje news:bu5lr1$182$
Hola a todos.

¿Cómo puedo restar dos horas del tipo 10:20 para que la resta me salga con
el mismo formato?

He intentado con:

dim h
h = datediff("n",horainicio,horafin)

Pero claro me calcula la diferencia en minutos, es decir, (20) lo que yo
necesito es que devuelva (00:20)

¿Cómo podría hacer esto?

Gracias.

Saludos.
José Carlos
www.siadv.com

Preguntas similares