Busqueda Avanzada

GUAPOBEN · #1 (**permalink**) 08/07/2003, 10:01

Que tal ¡¡¡¡

De vuelta a casa¡ hace mucho que no andaba de molestingon por aca, pero que bueno que ya regrese con esta bola de amigos inteligentes que siempre ayudan al que menos sabe sin esperar algo a cambio. pero bueno reciban un cordial saludo.

Quisiera saber si alguien me podria decir como puedo realizar una busqueda avanzada en asp, para mi web, por ejemplo, que me busque de una fecha x a una fecha x, que pueda seleccionar el tipo de busqueda, por decir , Libro,Escritor,o por descripcion.
ETC.

Alguien em puede ayudar?

Saludos cordiales y GRACIAS nuevamente.

lexus · #2 (**permalink**) 08/07/2003, 22:18

hola,

supongamos que vamos a crear 2 paginas una con un formulario desde donde se realizara la busqueda avanzada, y una segunda pagina donde recogeremos esos datos y la procesaremos para mostrar los resultados..

en formulario.asp

crea un formulario ya sea que lo envies por post o por get
con varios campos por ej:
en este caso lo enviaremos por get
y los campos del formulario son:
libro
escritor
descripcion
fecha

****************formulario.asp******************

Código:

<form action="buscar.asp" method="get" name="form1">
  <div align="center"> libro 
    <input name="libro" type="text">
    Escritor 
    <input name="escritor" type="text">
    Descripcion: 
    <input name="descripcion" type="text">
    Fecha: 
    <input name="fecha" type="text">
    <input type="submit" name="Submit" value="Buscar">
  </div>
</form>

***************************************

*******************buscar.asp************

suponiendo que tenemos ya la conexion con la bd, realizamos una sentencia sql asi:
con esto lo qeu hacemos es recoger la info de los campos de el formulario cuando usamos el metodo get:
request.querystring("campo_del_formulario")

Código:

Set RS = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM tutabla  WHERE libro LIKE '%" & _
request.querystring("libro") & "%' And escritor LIKE '%" & _
request.querystring("escritor") & "%' And descripcion LIKE '%" & _
request.querystring("descripcion") & "%' And fecha LIKE '%" & _
request.querystring("fecha") & "%' Order By libro ASC"
RS.Open sql, con, 3, 3

**********************************************

espero te sea de ayuda lo que te he enviado, cualquier cosa la colocas aqui y si puedo con mucho gusto te colaboro.

GUAPOBEN · #3 (**permalink**) 09/07/2003, 07:31

Oye, yo tengo mi pagina de busqueda de esta forma:

<style fprolloverstyle>A:hover {color: #FFCC66}
</style>
</head>

<body background="images/pagina1.gif" link="#333399" vlink="#333399" alink="#333399">

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

<%

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("libros.mdb")

Dim Temp

Temp="Select * From Skytels Where UCase(pal) like '%" & UCase(Request("palabra")) & "%'"

Tabla.Open Temp, Conexion
If Tabla.BOF And Tabla.EOF Then
%>

No se ha encontrado nada con
<%=Request("palabra")%> en la Base de Datos 

<%
Else
%>
<div align="center"><center>
<table border="1" cellpadding="0" cellspacing="0" width="77%" height="40">
<tr>
<td width="25%" height="21" bgcolor="#333399">
Titulo
</td>
<td width="25%" height="21" bgcolor="#333399">
Escritor
</td>
<td width="25%" height="21" bgcolor="#333399">
Descripción
</td>
<td width="25%" height="21" bgcolor="#333399">
Fecha
</td>
</tr>
<% While Not Tabla.EOF%>
<tr>
<td width="25%" height="19">
<%=Tabla.Fields("Titulo")%></td>
<td width="25%" height="19">
<%=Tabla.Fields("Escritor")%></td>
<td width="25%" height="19">
<%=Tabla.Fields("Descripcion")%></td>
<td width="25%" height="19">
<%=Tabla.Fields("Fecha")%></td>
</tr>
<%
Tabla.MoveNext
Wend
Tabla.Close
Conexion.Close
End If
%>
</table>
</center></div>
 
</body>
</html>

Existiria alguna forma de que quedará similar pero con los cambios de la busqueda avanzada??

De ante mano muchas GRACIAS

GUAPOBEN · #4 (**permalink**) 09/07/2003, 07:41

Referente a la fecha, Exite alguna forma en la cual pueda realizar una busqueda de una fecha a una fecha??
por ejemplo:

Realizar busqueda por fecha.

de Fecha1 [Campo] a la Fecha 2 [Campo].

La idea es que me arroje todo lo que encuentre en el periodo que se esta ingresando. Fecha1 y Fecha2

Esto es posible y como??

Gracias de Ante Mano

lexus · #5 (**permalink**) 09/07/2003, 08:14

tienes que hacerle un pequeño cambio al formulario para poder buscar entre rangos de fechas, agregale uno qeu se llame fecha1 y otro fecha2.
para buscar fechas en asp creo que es #mes-dia-año# osea que en el sql tiene que llevar almhoadillas#, en la busqueda deberas colocarlo por ejemplo asi:
fecha1 11-30-2003 fecha2 12-31-2003

los resultados se manejan asi:

en la pagina buscar.asp

Código:

<%
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("libros.mdb") 

Dim Temp

Temp = "SELECT * FROM Skytels  WHERE titulo LIKE '%" & _
request.querystring("titulo") & "%' And escritor LIKE '%" & _
request.querystring("escritor") & "%' And descripcion LIKE '%" & _
request.querystring("descripcion") & "%' And fecha
Between #" & request.querystring("fecha1")& "# And #" & request.querystring("fecha2")& "# Order By libro ASC"
Tabla.Open Temp, Conexion 
If not Tabla.eof then

' no estoy seguro de si asi se maneja la instruccion para las fechas pruebalo y me comentas.
%>

Resultados: <b><%=Tabla.recordcount%></b>
<% Do While not  Tabla.eof %>
Titulo:<%=Tabla("titulo")%><br>
escritor:<%=Tabla("escritor")%><br>
descripcion:<%=Tabla("descripcion")%><br>
fecha:<%=Tabla("fecha")%>
<%
' con esto nos movemos de uno en uno por cada
'registro
 Tabla.movenext
loop
%>

<%
'si no encontramos registros entonces 
'mostramos mensaje en pantalla
else
response.write "no hay resultados para su busqueda."
End if
%>

lo he acomodado un poco a tus necesidades, ya el resto es solo copiar y pegar en tu diseño.(tendras que cambiar el nombre de cada campo en el formulario de busqueda por el que corresponda para qeu coincida con el request.querystring.

espero te sirva, depronto sale algun error en lo de las fechas ya qye no estoy seguro de uqe asi sea, pero el resto si es asi estoy seguro..

me avisas.

GUAPOBEN · #6 (**permalink**) 09/07/2003, 10:51

GRACIAS por tu valiosa ayuda,
Lo de las Fechas lo probare dentro de un rato
GRACIAS nuevamente.

malchik · #7 (**permalink**) 14/09/2012, 10:06

Cómo seria este ejemplo pero en PHP 5 con oracle 10g?

AlZuwaga · #8 (**permalink**) 14/09/2012, 11:16

Pregunte en el foro correspondiente. No reviva temas casi 10 años antiguos si no va a aportar absolutamente nada al mismo.