ayuda consulta SQL por FECHA no me funciona

[mc_quake]

miren amigos este codigo no se por que no me funciona

al hacer esta consulta me funciona sin problemas

<%
Dim conexion, registros, sql
fecha = Request.Form("fecha")
if IsDate(fecha) then
fecha=CDate(fecha)
else
fecha=""
end if
response.write fecha
Set conexion = Server.CreateObject ("ADODB.Connection")
conexion.Open "DSN=InformeGestion"

Set registros = Server.CreateObject ("ADODB.RecordSet")
sql = "SELECT * FROM InforGestion WHERE origen = 'CCP' "
registros.Open sql, conexion

while not registros.EOF
ccp = ccp + 1
registros.MoveNext
Wend



registros.Close
Set registros = Nothing
Response.write ccp
%>

pero al hacer la misma consulta con este parametro mas no me funciona

<%
Dim conexion, registros, sql
fecha = Request.Form("fecha")
if IsDate(fecha) then
fecha=CDate(fecha)
else
fecha=""
end if
response.write fecha
Set conexion = Server.CreateObject ("ADODB.Connection")
conexion.Open "DSN=InformeGestion"

Set registros = Server.CreateObject ("ADODB.RecordSet")
sql = "SELECT * FROM InforGestion WHERE origen = 'CCP' AND echa_entrada = '"&fecha&"' "
registros.Open sql, conexion

while not registros.EOF
ccp = ccp + 1
registros.MoveNext
Wend



registros.Close
Set registros = Nothing
Response.write ccp
%>

[Alexis_m20]

Que base de datos utilizas??

si es access en ves de ' debe ser #

sql = "SELECT * FROM InforGestion WHERE origen = 'CCP' AND Fecha_entrada = #"&fecha&"# "

y a lo mejor te falta la F de echa_entrada

[mc_quake]

es una base de da datos access asi que hice lo ke pusiste en el mensaje anterior pero tampoco me muestra el resultado

[Alexis_m20]

tambien depende mucho del servidor si esta en ingles o si esta en español que tengas, manten los ## y transforma tu fecha a este mm/dd/aaaa y ve si te funciona

osea un ejemplo

qquieres buscar por el 01/12/2005 pero ponlo asi 12/01/2005

la ultima esta en ingles y funciona para las busquedas intentalo

[mc_quake]

compadre no me funciona nada de nada no se que onda con esta cuestion me tiene mas que enojado jajajjajaajaj

[Alexis_m20]

Yo tengo lo siguiente mira

"SELECT Top 1 Valor, Fecha FROM Valores WHERE TipoMon=1 AND Fecha <= #" &FormateaFecha(Date())& "# ORDER BY Fecha DESC"

y la funcion es esta

function FormateaFecha(fecha)
dia = day(fecha)
mes = Month(fecha)
if len(dia) = 1 then dia="0"&dia
if len(mes) = 1 then mes="0"&mes
FormateaFecha = mes&"/"&dia&"/"&year(fecha)
End function

y funciona impeke

ten cuidado por que si viene vacia la fecha que le mandas??

vacio
eso no te va a funcionar

[JuanRAPerez]

y el error es?

[mc_quake]

ALEXIS M20:

compadre saves que eso si me funciono eres grande jajajajajaj ahora solo kero saber algo tu le pasas a la funcion FormateaFecha el valor Date() que devuelve la fecha actual del sistema
de esta forma <= #" &FormateaFecha(Date())& "#

como puedo hacer para pasar el siguiente valor que lo obtengo de la siguiente forma

fecha = response.request ("fecha")
quiero saber que tengo que hacer para poner esa variable fecha en ves de la funcion Date()

[Alexis_m20]

solamente reemplazando el Date() con la variable de fecha

esta variable no puede ir vacia si no siempre con datos

[mc_quake]

ok gracias brother se te agradece lo estoy probando pero no me resulta jajajajaja
seguire intentando
gracias