Como hago una liquidacion diaria cuyo criterio es de 7am a 7am?

[moche_67]

hola atodos estyo haciedo un sistema de liquidacion estas se tiene ke realizar por ej asi: la liquidacino del dia 15 abarca desde las 7am del dia 15 hasta las 7am del dia 16...se me okurrio esto pero no fuciona

las fechas ke tomo tiene le formato efcha genreal (MSAccess):
01/01/04 12:00:00 a.m.

esta es mi sentecia sql ke no funciona:Set rs = New Recordset
cn.CursorLocation = adUseClient
rs.ActiveConnection = cn
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic

rs.Open

"SELECT id_rubro, descripcionrub, id_subrubro, descripcionsub, id_servicio, descripcion, Sum(submovimiento.total) AS SumaDemonto FROM movimiento
"INNER JOIN submovimiento ON movimiento.id_movimiento = submovimiento.id_movimiento
"WHERE datevalue(fecha) <= '" & fechafin & "') AND datevalue(fecha) >= fechainicio & "')
"GROUP BY descripcionrub, descripcionsub, descripcion, id_rubro, id_subrubro, id_servicio"

Set DataGrid1.DataSource = rs

Espero ke ke me aduebn a darme kuenta estoy hacinedo mal, gracias

[GeoAvila]

pienso que la parte del where quedarial algo asi

"WHERE datevalue(fecha) <= '" & fechainicio & " 7:00:00 a.m.
') AND datevalue(fecha) >= fechafin & "12:00:00 p.m.
')

espero te sirva..

[moche_67]

ola tu kreees ke exista algo ke me declare fecha sin datevlue porke datevalue extrae el valor de la fecha sin la hora, hay algo keme tome date kon todo lo ke tiene es decir fecha y hora?

[GeoAvila]

quitale el datevalue y pone esto asi..

"WHERE fecha <= #" & fechainicio & " 7:00:00 a.m.#) AND fecha >= #" & fechafin "12:00:00 p.m.#)

espero te sirva...

nos vemos..