Error restando fechas - Access y VB 2008

[freegirl]

Hola

estoy restando fechas a través de una función de VB y otras veces mediante una consulta access. Pero da diferentes resultados (siempre es un desfase de 1 día).

Función VB:

Código:

DateDiff(DateInterval.Day, Now, fechaFinal)

Fecha final: 03/07/2099

La función me retorna: 3


Consulta Access:

Código:

Select DATEDIFF('d', now , fechaFinal) as diasRestantes FROM tabla1

Fecha final: 03/07/2099

La función me retorna: 4

¿por qué retornan distintos valores? como se podría solventar? ya que he probado formatenado las fechas pero entonces lo calcula mal....


Saludos

PD: para vosotros cual es el resultado correcto? ya que depende de como se mire puede ser uno u otro. Para mí, quedan 3 días para el 3 julio...

[srxfalso]

plop.. shuta no se mucho las veces que la e ocupado ha sido en sql y las ocupo con la siguente sintaxis ...

Select DATEDIFF(day, getdate(), '21/07/2099')

en access y SQL

saludos...

[freegirl]

dónde no lo hace bien es es en VB. La función en Access, Excel, SQL, etc. lo hace OK.

Lo he solucionada un poco a lo cutre hasta que no encuentre una solución un poco más formal.

Cuando la fecha actual del sistema sea igual o superior a la fecha a restar:

DateDiff(DateInterval.Day, Now, fechaFinal) +1

Así funciona..No obstante, sigo buscando el por qué Datediff en VB sale siempre un día desfasado.

[freegirl]

encontre la solución. En fin....más tonto el fallo no podía ser:

Código Soluci&#243:

DateDiff(DateInterval.Day, Now.Date, fechaFinal)