Ver Mensaje Individual
  #12 (permalink)  
Antiguo 01/03/2012, 01:57
quimfv
Colaborador
 
Fecha de Ingreso: marzo-2008
Ubicación: Sabadell
Mensajes: 4.897
Antigüedad: 16 años, 1 mes
Puntos: 574
Respuesta: Consulta base de datos: Filtro con Fecha()

Supongo que si pero no uso Access 2007, de hecho miro de no usar access.

Deberias hacer algo así para el boton -1 para evitar ese nulo


Código vb:
Ver original
  1. Private Sub botonMenos1_Click()
  2.    Dim dia As Date
  3.  
  4. 'Lee me.fecha, ahora no es nul porque estamos en un registro
  5.       dia = Me.fecha
  6.    
  7. 'Inicia bucle
  8. do
  9.        dia=dia-1
  10. 'aplica el filtro
  11.       DoCmd.ApplyFilter , "fecha=#" & dia & "#"
  12. 'lee me.fecha si es nul sigue el bucle si no
  13.   Loop while Me.fecha is null
  14. End Sub

Así el boton -1 buscara la primera fecha anterior a la actual con registros....

Claro que si "hoy" no tienes registros todo fallará, tendrias que modificar con un bucle similar a este el codigo de hoy y de ayer...
__________________
Quim
--------------------------------------------------
Ayudar a ayudar es una buena práctica!!! Y da buenos resultados.

Última edición por quimfv; 01/03/2012 a las 02:19