Problema con buscador de fechas....

Potro · #1 (**permalink**) 21/05/2004, 15:30

Hola amigos de los foros...

Pues por sin alguien se apiado y me ha enviado un ejemplo de como hacer el buscador por fechas....

Pero tiene un problemita....

Cuando consulto de la fecha 02/02/2004 al 09/02/2004 ....

Todo sale bien PERO::::::::::::::::::

Cuando consulto de la fecha 02/02/2004 al 10/02/2004

Me avienta registros del mes de febrero y de marzo...

todo se descompone....

Aqui esta la página para que ustedes mismos lo sercioren...

http://www.mexitours.com.mx/buscador/busquedas.htm

y quisiera pedir de favor si alguien me pudiera hechar la mano a revisar mi asp....

Lo publico en la siguiente.....

Potro · #2 (**permalink**) 21/05/2004, 15:34

<% @LCID = 1034 %>
<html>

<head>
<title>Buscar entre Fechas</title>
</head>

<body>

<img border="0" src="yo.gif">

Resultados obtenidos con <%=Request("frase") %>

<%
'realizamos la conexión de la Base de Datos

Dim Conexion,Tabla

Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla=Server.CreateObject("adodb.recordset")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("gacetas2.mdb")

'definimos las variables de busqueda

Dim temp

'Creamos la sentencia SQL que extrae de la base las páginas que tienen la palabra que buscamos
'buscando con el operador LIKE obtenemos apariciones del substring escrito en el formulario, entre las palabras clave

'fecha1 = request("fechadesde")
'fecha2 = request("fechahasta")

'if isdate(request("fechadesde"))then
' dia1 = day(request("fechadesde"))
' mes1 = month(request("fechadesde"))
' ano1 = year(request("fechadesde"))
' else
' response.write("fecha invalida")
'end if

'if isdate(request("fechahasta"))then
' dia2 = day(request("fechahasta"))
' mes2 = month(request("fechahasta"))
' ano2 = year(request("fechahasta"))
' else
' response.write("fecha invalida")
'end if

'***********

if isdate(request("fechadesde")) AND isdate(request("fechahasta"))then

'dia1 = day(request("fechadesde"))
'mes1 = month(request("fechadesde"))
'ano1 = year(request("fechadesde"))
'dia2 = day(request("fechahasta"))
'mes2 = month(request("fechahasta"))
'ano2 = year(request("fechahasta"))

'***********
temp = "SELECT Tabla1.* FROM Tabla1 WHERE ((([Tabla1]![ano] & [Tabla1]![mes] & [Tabla1]![dia]) Between " & year(request("fechadesde")) & month(request("fechadesde")) & day(request("fechadesde")) & " And " & year(request("fechahasta")) & month(request("fechahasta")) & day(request("fechahasta")) & ")) "

tabla.Open temp, Conexion

If Tabla.BOF And Tabla.EOF Then
%>
No se ha encontrado nada con <%=Request("frase")%> en la Base de Datos
<%
Else
'aquí comienza el Script que nos muestra los resultados,
'si los encuentra en la tabla
%>
<div align="center"><center>
<table border="1" cellpadding="0" cellspacing="0" width="30%" height="74" bordercolor="#FFFFFF">
<tr>
<td width="33%" bgcolor="#393863" height="19">
Fecha
</td>
<td width="34%" bgcolor="#393863" height="19">
RIB</td>
<td width="33%" bgcolor="#393863" height="19">
CHUCK</td>
</tr>
<% While Not Tabla.EOF%>
<tr>
<td width="33%" bgcolor="#D6CBE7" height="51">
<%=Tabla.Fields("fecha")%></td>
<td width="34%" bgcolor="#D6CBE7" height="51">
<%=Tabla.Fields("rib")%></td>
<td width="33%" bgcolor="#D6CBE7" height="51">
<%=Tabla.Fields("chuck")%></td>
</tr>
<%
'si encuentra mas de un resultado nos hace una celda mas en la tabla
Tabla.MoveNext
Wend
Tabla.Close
Conexion.Close
End If
'************
else
response.write"La fecha es invalida por favor verifiquela y vuelva a intentar [dd/mm/aaaa]"
end if
'************
%>
</table>
</center></div>
Busquedas
Web Master Edwin Diaz 2004 <img border="0" src="yo.gif">
 
</body>
</html>

TeresitaHP · #3 (**permalink**) 22/05/2004, 13:06

Me suena a que para la primer fecha te toma el formato DD/MM/YYYY y para la segunda MM/DD/YYYY
Te sugiero que en el filtro de fechas en tu query utilices lo siguiente:
CONVERT(DATETIME, CONVERT(VARCHAR, Fecha, 101)) para el campo de tu tabla y para cada uno de los filtros del between, esto va a obligar a darle el fotmato que tu quieres para todas las fechas.
El 101 lo convierte a MM/DD/YYYY
El 103 lo convierte a DD/MM/YYYY

Suerte!!

Potro · #4 (**permalink**) 24/05/2004, 09:20

mil gracias teresitaHP

peor en donde debo exactamente poner esa linea....