controlando cuando una hora esta entre otras 2

[VOLENDAM_NR]

Buenas...

A ver si me pueden ayudar con esta duda...

estoy intentando controlar que si la hora actual del sistema está entre una hora de inicio y una hora de fin, que ejecute una determinada consulta, y que sino desplegue un error (que por ahora no lo puse, pues estoy probando con mensajes simples, para ver si funciona correctamente)

hora_inicio y hora_fin son del tipo datetime hour to minute

por ahora lo estoy haciendo asi:

b = FormatDateTime(Time, vbLongTime)
c = FormatDateTime(RS1!hora_fin, vbLongTime)

If b > c Then
MsgBox "el valor es: " & c & "y" & b

el problema surge en q la hora actual esta fijada en 10:21 pm y la hora de fin seria la 1:20 pm, y el mensaje no se muestra (siendo que las 10 pm es mayor que la 1 pm)

que me sugieren , seria la manera correcta de comparar si la hora actual del sistema (en visual) esta dentro de 2 horas (que son campos dentro de una base de datos, aclaro q el valor de hora_inicio es 12:35 pm y hora_fin 1:20 pm)

P.D. * la base de datos es en informix
* quise probar con un select extend(nombreatributo, hour to minute) from TABLA para sacar solamente hora y minutos, pero me devuelve toda la fecha entera

[A.H.H]

hola no se si te sirve de algo pero yo tenia esto puesto en un programa que mediante un control timer apagaba el ordenador entre las 23:30 y las 7:00 de la mañana (osea que no se podia usar ya que si iniciabas sesion entre los dos intervalos de hora se volvia apagar, era para que la cria no encendiera su ordenador por la noche..), y salia un mensaje.


Private Sub Timer1_Timer()
lahora = Time$
INICIO = "23:30:00"
FINAL = "07:00:00"
If lahora < FINAL Or lahora >= INICIO Then
'aqui lo que quieras que haga'
.......
.......

else
.......
end if
end sub

nota: el interval del timer a 1000

[VOLENDAM_NR]

logre solucionarlo...
simplemente utilizando la funcion format, logre lo que queria.. no entiendo porque al principio no me funciono bien...

gracias x ayudar AHH