Ver Mensaje Individual
  #2 (permalink)  
Antiguo 09/10/2007, 02:33
tammander
 
Fecha de Ingreso: enero-2006
Ubicación: Torroles (Costa der Só)
Mensajes: 1.017
Antigüedad: 19 años, 4 meses
Puntos: 7
Re: filtrar fecha de hoy

Asi, a bote pronto:

Dim hoy

hoy = Now()

if Weekday(hoy) = 1 then ' es Domingo
hoy = dateAdd("d", 1, hoy)
elseif Weekday(hoy) = 7 then ' es Sabado
hoy = dateAdd("d", 2, hoy)
end if

Luego no tienes mas que SELECT * FROM menu WHERE fecha = #" & hoy & "#"

Espero te sirva


Un saludo
__________________
"Tus pecados son el estiércol sobre el que florecerán las flores de tus virtudes" - Gerald Messadié -