problema con datediff

[thestroyer_dj]

hola!!

mm...tengo un problemita un poco raro... les cuento:

tengo un formulario en el que se deben calcular dos horas ingresadas por el usuario, Hora de inicio y Hora de termino, y luego se debería mostrar la Resta de estas horas (Total horas).
usé Datediff para hacerlo, y lo que pasa es lo siguiente:

por ejemplo si ingreso:
Hora inicio: 15:30 Hora termino: 16:30

1.- en el primer calculo de horas que hago no se muestra el total.
2. en el segundo calculo se muestra el total correspondiente, q en este caso sería "1".
3. si vuelvo a hacer la misma operacion sale "1" nuevamente, hasta ahi bien.
4. ahora si cambio la hora de inicio y de termino, por ej: Hora inicio: 10:00 Hora termino: 10:30, se vuelve a mostrar el valor total anterior, o sea "1".
pero si vuelvo a ingresar Hora inicio: 10:00 Hora termino: 10:30 se muestra el resultado correspondiente.
En ningun momento se arrojan errores, solo pasa lo q acabo de contar.

este es mi codigo, espero se entienda:

Dim sHora_inicio, sfecha_termino, horas
sHora_inicio=session("Hora_inicio")
sHora_termino=session("Hora_termino")
shoras=session("horas")
sHora_inicio=(Recordset1.Fields.Item("Hora_inicio" ).Value)
sHora_termino=(Recordset1.Fields.Item("Hora_termin o").Value)
horas=datediff("s","01-01-2005 " & sHora_inicio,"01-01-2005 " & sHora_termino)/3600

aun no logro entender por q pasa todo eso :(
ojala puedan ayudarme a solucionarlo, o recomendarme algun otro sistema q haga lo mismo.

saludos.