Un saludo a todos.
Hasta ahora tenía un sencillo buscador asp en mi web para encontrar topicos
y respuestas sobre access. Lo podeis ver aqui:
www.mvp-access.com/buho/buscador.asp
Ayer me propuse ir cambiando un poco dicho buscador en el sentido de poder
buscar mas de una palabra y que el usuario escogiera si dicha union de
palabras se hace con AND o OR...me he puesto ahora por la mañana...y no veo
donde puedo tener el fallo.
Lo siento si la pregunta es trivial, pero cuando uno está cerrado, esta
cerrado...
Este es el trozo HTML del formulario
<form name="form1" method="post" action="Buscadorprueba.asp">
<select size="3" name="Opcion">
<option selected value="AND">AND</option>
<option value="OR">OR</option>
</select>
<input type="text" name="palabra">
<input type="submit" name="Submit" value="Buscar Palabra(s) Clave(s)">
</form>
aqui recojo variables...
<%
Dim Buscar
Dim Metodo
Metodo=Request.Form("Opcion")
Buscar = Request.Form("palabra")
%>
abro conexion etc etc
(La siguiente idea, la cogí aqui, de estas mismas News)
Matriz = split(Buscar, " ", -1, 1)
sSQL = "SELECT Id, Titulo, Comentarios, Claves, Link FROM Busqueda WHERE"
for i = 0 to ubound(matriz)
sSQL = sSQL & " Claves LIKE '%" & Matriz(i) & "%' OR"
next
sSQL = left(sSQL, len(sSQL)-2)
'--
esto funciona, es decir, escribiendo OR directamente en la Sql.
Ahora bien, soy incapaz de entrecomillar la variable Metodo, que puede
portar los valores OR ó AND
Si pruebo:
sSQL = sSQL & " Claves LIKE '%" & Matriz(i) & "%' " & Metodo
y Metodo trae el valor OR me funciona.
Si trae el valor AND me da error de sitaxis
Ya os comentaba: cuando uno está cerrado, está cerrado y no ve mas allá de
sus propias narices...
Saludos desde Valladolid
Francisco Javier García Aguado
buhonews@mvp-access.com
http://www.mvp-access.com/buho
http://www.mvp-access.com/foro
http://groups.msn.com/Access2000VisualBasic/
Mi Perfil de MVP en Microsoft:
http://tinyurl.com/6ysvu
Este correo ha sido testeado y no tiene virus (Al menos conocidos). Saludos
de Francisco Javier García Aguado (Buho)
Checked by AVG anti-virus system (
http://www.grisoft.com).
Version: 6.0.760 / Virus Database: 509 - Release Date: 10/09/2004
Leer las respuestas