
21/01/2003, 12:19
|
 | | | Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 23 años, 4 meses Puntos: 1 | |
Pues se parece mucho a lo que yo hice y que creo que puse en las FAQ's
Solución:
buscar=Split(Replace(Request.Form("buscar"),"'","' '"))
SQL="SELECT * FROM info WHERE INSTR(Contenido,'"&Buscar(0)&"')"
For i=1 to Ubound(Buscar)
SQL=SQL&" OR INSTR(Contenido,'"&Buscar(I)&"')"
Next
For i=0 to Ubound(Buscar)
SQL=SQL&" OR INSTR(OtroCampo,'"&Buscar(I)&"')"
Next
For i=0 to Ubound(Buscar)
SQL=SQL&" OR INSTR(OtroCampo2,'"&Buscar(I)&"')"
Next
.
.
.
set rs=oConn.Execute(SQL) |