¿¿Como hacer un BUSCADOR en ASP...??

[ciisteado]

Hola a todos:

Tengo la necesidad de crear un buscador en ASP (tipo google), a diferencia que este buscador solo debe hacer consultas sobre tablas especificas, pretendo ponerle 4 parametros de busqueda, por ejemplo de la tabla CLIENTES poder consultar un registro en base al ID, NOMBRE, APELLIDO ó Nº TELEFONICO (estas 4 opciones estaran con su respectivo "option button"), los resultados de esta busqueda quiero que aparezcan en la misma pagina-(olvidemos ahora la paginacion de los resultados)...

No sé si me expliqué..?? ... el problema real es que no sé como hacerlo...

Alguien podría postearme una idea.... lo agradeceré muchismo...

Saludos...

[u_goldman]

Tiene un rato que no toco ASP, pero una de las formas mas sencillas para hacer un buscador es la siguiente, se asume que tienes ya una conexión activa:

Código:

<form bla bla bla>
 Buscar: <input type="text" name="buscar" value="" />
 <hr />
Criterio:<br />
<checkbox name="buscarid" value="1" />ID<br />
<checkbox name="buscarnombre" value="1" />Nombre<br />
<checkbox name="buscarapellido" value="1" />Apellido<br />
<checkbox name="buscartelefono" value="1" />Telefono<br />
Boton Submit
</form>

En base a los criterios de busqueda crearás dinámicamente tu consulta, solamente te vales de una variable argCount que te dice si ya tiene argumentos dicha consulta, si no los tiene, entonces concatena la condición necesaria (WHERE) si los tiene entonces concatena el operador lógico (OR), el campo y su respectivo valor.

Una vez que lo tengas hecho convendrá agregar seguridad para evitar el uso de inyección de SQL porque de esta manera está vulnerable, pero esa es otra historia.

Código:

Dim argCount, termino
termino  = Request.Form("buscar")
argCount = 0
strSQL = "SELECT campos FROM tabla "

if len(Request.Form("buscarid")) > 0 then
   if argCount > 0 then
       strSQL = strSQL & " OR "
   else
      strSQL = strSQL & " WHERE "
   end if
   strSQL = strSQL & " id =" & termino 
   argCount = argCount + 1
end if

if len(Request.Form("buscarnombre")) > 0 then
   if argCount > 0 then
       strSQL = strSQL & " OR "
   else
      strSQL = strSQL & " WHERE "
   end if
   strSQL = strSQL & " nombre like '%" & termino  & "%' "
   argCount = argCount + 1
end if


if len(Request.Form("buscarapellido")) > 0 then
   if argCount > 0 then
       strSQL = strSQL & " OR "
   else
      strSQL = strSQL & " WHERE "
   end if
   strSQL = strSQL & " apellido like '%" & termino  & "%' "
   argCount = argCount + 1
end if


if len(Request.Form("buscartelefono")) > 0 then
   if argCount > 0 then
       strSQL = strSQL & " OR "
   else
      strSQL = strSQL & " WHERE "
   end if
   strSQL = strSQL & " telefono like '%" & termino  & "%' "
   argCount = argCount + 1
end if

Set rs = Conn.Execute(strSQL)

Saludos

[Epunamun]

para que no sea vulnerable googlea con parametros SQL, asi evitaras la sql injection..... salu2 nos bites.

[ciisteado]

Hey...

Gracias u_goldman, con la idea que posteaste pude adecuar el código a mis necesidades... ahora el problema que tengo es de otro tipo....

El buscador que realice es para utilizarlo en un pequeño sistemita de ventas, en el que existen varios modulos y los cuales manejo desde un "DEFAULT" mediante "SECCIONES", que son activadas a la hora de Clickear sobre el menu principal...

el problema esta en que a la hora de incorporar ese buscador a todo el sistema, no me muestra los resultados o me manda a otra página... creo que es un problema con el "FORM" o las "SECCIONES"... la verdad no lo sé...

¿¿otra ves no sé si me explique...??

Espero puedas seguir ayudandome...

Gracias por todo....

Saludos...