Como hacer... WHERE Fecha >= fecha actual

[Uefor]

He probado varias formulas con esta sentencia pero no me la coge... o saca todos o ninguno dependiendo de si pongo < ó >

fechaactual = FormatDateTime(Date, 2)

SELECT * FROM tabla WHERE campoFecha >= #"&fechaactual&"#

Quiero seleccionar solo las fechas de hoy en adelante.
SaLu2

[Adler]

Hola, prueba esto

Dim hoy
Dim fechaactual
hoy = Now()
fechaactual = FormatDateTime(hoy, 2)

Suerte

[Uefor]

No funciona , me hace lo mismo Adler

[gagarin]

yo lo tengo asím uso access:

fechaH = date()

sSQL= "SELECT * FROM Solicitudes WHERE fecha >= #"&fechaH&"#"
Espero sirva, que base de datos usas

Mira tu base de datos, el campo debe estar así:

formato = Fecha Corta (dd/mm/aaaa)

Y si quieres que se rellene automáticamente con la fecha en la que el registro fue creado pones esto:
ValorPredeterminado =fecha()

saludos

[JuanRAPerez]

access nos imaginamos

SELECT * FROM tabla WHERE campoFecha >= '20071105'

pruebalo asi ojo tiene que ser 05 y no solo 5
al igual los meses tiene que ser 08 no 8 para agosto

suerte


si no prueba algo mas largo jejeje
diaH = day(fechaH)
mesH = month(fechaH)
anyoH = year(fechaH)

sSQL= "SELECT * FROM Solicitudes WHERE day(fecha) >= '"& diaH &"' and month(fecha) >= '"& mesH &"' and year(fecha) >= '"& anyoH &"'

suerte

[Uefor]

También uso Access... probaré con esto a ver que pasa, pero varía poca cosa de lo que yo tengo, además en la db lo tengo también como fecha corta

[JuanRAPerez]

...pero varía poca cosa de lo que yo tengo...

claro pero funciona, sobre todo el largo...

[Uefor]

He probado con ambos métodos y me hacía cierto filtrado pero me daba problemas con el tema de la hora inglesa y esas cosas, así que he optado por esto y por fin funciona ya:

Código:

        fechaH = date() 
        sSQL="SELECT Fecha, Idevento FROM Tabla WHERE Fecha <> NULL ORDER BY Fecha, Idevento"
        set RS = Conn.Execute(sSQL) 
        Do While not RS.eof 
        Fech = RS("Fecha")
        If fechaH <= Fech  Then	
        Response.Write("<input NAME='evento' TYPE='text' VALUE='"&RS("Idevento")&"'>")
        Response.Write("<input NAME='fecha' TYPE='text' VALUE='"&RS("Fecha")&"'><br>")
        End if  			                  
        RS.MoveNext
        Loop

Creo que el problema estaba en la db que estaba con hora larga... gracias por la ayuda.