Fechas con Access..

[Acostag]

alguien me puede ayudar con las Fechas y el Access. ???

este es mi codigo..

<%
Response.Buffer = true
Dim miconexion, mirecordset, mirecordset2, micomando, micomando2
Set miconexion = Server.CreateObject("ADODB.Connection")
miconexion.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/Benavides/DB/Benavides.mdb")
Set micomando = Server.CreateObject("adodb.command")

micomando.ActiveConnection = miconexion
micomando.CommandText = "Select * From Captura_Bitacora where Fecha_pro = '" & Request("DIA") &" ' order by Id"
Set mirecordset =micomando.Execute
While Not mirecordset.EOF
%>

Help.... Help..

Saludos
Luis.R.acosta

[Teri]

Las fechas en Acces se encierran entre corchetes, puede que sólo sea eso

Un saludo

[Acostag]

Corchetes .. [] ???

ya lo Intene con ## y con &&.. pero no sale...

dejame lo checo con corchetes Tienes algun Ejemplo..?

Saludos
Luis.R.Acosta

[Teri]

Dusculpa, se me ha ido la cabeza , son almohadillas, y el formato de fecha es mm/dd/yyyy

[benayas]

mete tambien el Request("Dia") con un Trim(request("Dia") ya que asp suele meter delate un espacio en blanco que debes de controlar para asegurarte de que le pasas como parametro una fecha valida antes me imagino qque la validas con Cdate(Trim(request("Dia"))

Tabien puede probar esto:

micomando.CommandText = "Select * From Captura_Bitacora where Fecha_pro = #" & Trim(Request("DIA")) &"#' order by Id"

[u_goldman]

mete tambien el Request("Dia") con un Trim(request("Dia") ya que asp suele meter delate un espacio en blanco que debes de controlar

Nunca me ha pasado algo así...será otro demonio de MS?


Salu2,

[Acostag]

NO JALA ESTE PEXXXXXXX....

este es el error que me marco... ya puse ##, "", (cdate)


Heeeelp.... heeeelp.... Necesito Terminar con este Reporte....

Saludos
Luis.R.Acosta

[Teri]

Y porqué no pones el texto del error??????

[Acostag]

(este es la fecha corta en access)02/08/03

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in string in query expression 'Fecha_pro = #02/08/03#' order by Num_proc'.


este es el codigo
<%= request.form("Dia")%>
<%
Response.Buffer = true
Dim miconexion, mirecordset, mirecordset2, micomando, micomando2
Set miconexion = Server.CreateObject("ADODB.Connection")
miconexion.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("/Benavides/DB/Benavides.mdb")
Set micomando = Server.CreateObject("adodb.command")

micomando.ActiveConnection = miconexion
micomando.CommandText = "Select * From Captura_Bitacora where Fecha_pro = #" & Trim(Request("DIA")) &"#' order by Num_proc


Como comentario... este valor lo saco de un combox. ..

saludos
Luis.R.acosta

[Teri]

Prueba a cambiar esto, no sé si es un error de transcripción, o es que lo tienes así en el código

micomando.CommandText = "Select * From Captura_Bitacora where Fecha_pro = #" & Trim(Request("DIA")) &"# order by Num_proc"

Detrás de la almohadilla, tienes una comilla simple, quítala, y cierra las comillas detrás de Num_proc

[Acostag]

ya hice las modificaciones y ahora me sale este tipo de error


[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

[Teri]

¿Qué vale request("Dia")?

Escribe un response.Write ("Select * From Captura_Bitacora where Fecha_pro = #" & Trim(Request("DIA")) &"# order by Num_proc")

y manda el texto de la SELECT

[Acostag]

este es el resultado el response.Write

Select * From Captura_Bitacora where Fecha_pro = #02/08/03# order by Num_proc


esto es para ver como es la Syntaxis .??

[Teri]

Sí... es par ver que SELECT estabas enviando a la base de datos, y en principio parece correcta, comprueba que no tengas nulos o algún otro tipo de dato en el campo que estás filtrando en la tabla, y más concretamente en el campo fecha por el que filtras

[AlexNV]

prueba con el formato iso (yyyy-mm-dd). siempre funciona.

Select * From Captura_Bitacora where Fecha_pro = '2003-08-02' order by Num_proc

tratalo como un string.

[AlexNV]

o si te quieres asegurar,

Select * From Captura_Bitacora where year(Fecha_pro) = '" & year(Request("DIA")) & "' and month(fecha_pro) = '" & month(Request("DIA")) & "' and day(fecha_pro) = '" & day(Request("DIA")) & "' order by Num_proc

[Acostag]

Gracias.. AlexNV

ese fue el codigo del Millon de dolares...

gracias tambien a teri... por haberme ayudado...

MAESTROS MIL GRACIAS:::

Saludos
Luis.R.Acosta