Foros del Web » Programando para Internet » ASP Clásico »

Ayuda con Este codigo

Estas en el tema de Ayuda con Este codigo en el foro de ASP Clásico en Foros del Web. Hola, Nesesito ayuda con este Codigo de un Buscador: <html> <head> <title>Buscar</title> </head> <body bgcolor="#FFFFCC"> <p align="center"><font face="Verdana" size="2" color="#0000FF">Resultados Obtenidos con&nbsp;<strong><%=Request("Palabra") %></strong></font></p> <% Dim ...
  #1 (permalink)  
Antiguo 27/01/2003, 02:20
 
Fecha de Ingreso: enero-2003
Mensajes: 24
Antigüedad: 21 años, 3 meses
Puntos: 1
Pregunta Ayuda con Este codigo

Hola, Nesesito ayuda con este Codigo de un Buscador:


<html>

<head>
<title>Buscar</title>
</head>

<body bgcolor="#FFFFCC">

<p align="center"><font face="Verdana" size="2" color="#0000FF">Resultados Obtenidos con&nbsp;<strong><%=Request("Palabra") %></strong></font></p>

<%

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

Dim Temp

Temp="Select * From nilo Where UCase(pal) like '%" & UCase(Request("palabra")) & "%'"
Tabla.Open Temp, Conexion
If Tabla.BOF And Tabla.EOF Then
%>

<p align="center"><font face="Verdana" size="2" color="#0000FF">No se ha encontrado
Nada con <strong><%=Request("palabra")%></strong> en la Base de Datos </font><a href="http://192.168.0.69/buscanilo" target="Amancio"><font face="Verdana" size="2" color="#FF0000">Seguir
Buscando</font></a></p>


<%
Else
%>
<div align="center"><center>
<table border="1" cellpadding="0" cellspacing="0" width="102%" height="41" bordercolor="#008000">
<tr>
<td width="26%" height="19">
<p align="center"><strong><font face="Verdana" size="2" color="#FF0000">Categoria</font></strong>
</td>
<td width="30%" height="19">
<p align="center"><strong><font face="Verdana" size="2" color="#FF0000">Nombre de la pagina</font></strong></p>
</td>
<td width="52%" height="19">
<p align="center"><strong><font face="Verdana" size="2" color="#FF0000">Descripcion</font></strong>
</td>
<td width="19%" height="19">
<p align="center"><strong><font face="Verdana" size="2" color="#FF0000">Url</font></strong></p>
</td>
</tr>
<% While Not Tabla.EOF%>
<tr>
<td width="26%" bgcolor="#FFCC00" height="18">
<p align="center"><font face="Tahoma" size="2"><%=Tabla.Fields("Categoria")%></font></td>
<td width="30%" bgcolor="#FFCC00" height="18">
<p align="center"><font face="Tahoma" size="2"><%=Tabla.Fields("Nombre")%></font></td>
<td width="52%" bgcolor="#FFCC00" height="18">
<p align="center"><font face="Tahoma" size="2"><%=Tabla.Fields("Des")%></font></td>
<td width="19%" bgcolor="#FFCC00" height="18">
<p align="center"><a href="<%=Tabla.Fields("url")%>"><font face="Verdana" size="2">Ir</font></a>
</tr>
<%
Tabla.MoveNext
Wend
Tabla.Close
Conexion.Close
End If
%>
</table>
</body>
</html>



Aqui solo me Busca en el Campo (Pal) de la Base de datos, Lo que Yo quiero es que me me Busque en Varios Campos de una Base de datos, Nesesito Ayuda.
Atte:
Amancio.
  #2 (permalink)  
Antiguo 27/01/2003, 14:30
Avatar de Mickel  
Fecha de Ingreso: mayo-2002
Ubicación: Lima, Peru
Mensajes: 4.619
Antigüedad: 22 años
Puntos: 7
Esto no es un problema del ASP. Mas aun, ni siquiera es un problema. Tu mismo has puesto

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

una orden para limitar la busqueda donde pal sea como "palabra", si quieres usar mas campos tendras que agregarlos con OR
  #3 (permalink)  
Antiguo 27/01/2003, 15:10
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 4 meses
Puntos: 1
Puedes adaptar un código que puse en las FAQ's algo de e-commerce es un buscador pero si lo adaptas funciona perfecto.

O creo que hasta ya hace lo que quieres. Ya ni me acuerdo
  #4 (permalink)  
Antiguo 28/01/2003, 04:32
Avatar de Atonovich  
Fecha de Ingreso: diciembre-2002
Ubicación: ...
Mensajes: 117
Antigüedad: 21 años, 4 meses
Puntos: 0
Solo como comentario... Excelente script Urjose Echale un ojo!!!
__________________
" El hombre es una invención de Dios o Dios es una invención del hombre..."
  #5 (permalink)  
Antiguo 29/01/2003, 01:25
 
Fecha de Ingreso: enero-2003
Mensajes: 24
Antigüedad: 21 años, 3 meses
Puntos: 1
Soy nuevo

Muchas gracias a Todos por Sus respuestas, Pues la verdad spy nuuevo en asp. y la verdad no Entendi nada, De todos muchas gracias, Seguire Buscado.
__________________
Amancio M.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta

SíEste tema le ha gustado a 1 personas




La zona horaria es GMT -6. Ahora son las 01:10.