Ver Mensaje Individual
  #8 (permalink)  
Antiguo 13/06/2003, 11:39
nicolasd
 
Fecha de Ingreso: mayo-2003
Ubicación: Montevideo - Uruguay
Mensajes: 37
Antigüedad: 21 años, 11 meses
Puntos: 0
Aqui te adjunto el codgo para que obtengas las palabras del string que pasado por el formulario.

La demas clasula de la consulta SQL va antes lo que tu armas
aqui es otro string el cual va concatenado a la Clausula WHERE


'-1=Retorna todos los sbstrings -1 -- 1=Realiza una comparcion textual
' " " Separador de palabras

Arraypalabra = Split(pstrconsulta, " ", -1, 1)

'largo array
CantidadPalabras=UBound(Arraypalabra, 1)
i=0
strSQLBusqueda=""

while i <= CantidadPalabras

palabra=ArrayPalabra(i)
'DEBUG Response.write "<p class=""blanco"">" & palabra & "(" & i & ")</p><br>"
'para la primer palabra no va el OR

if (i=0) then
strSQLBusqueda= strSQLBusqueda _
& " AU_MATERIAL.PALABRAS_CLAVE Like '%" & palabra & "%'" _
& " OR AU_MATERIAL.DESCRIPCION Like '%" & palabra & "%'" _
& " OR AU_FORMATO_MATERIAL.DESCRIPCION Like '%" & palabra & "%'"
else
strSQLBusqueda= strSQLBusqueda _
& " OR AU_MATERIAL.PALABRAS_CLAVE Like '%" & palabra & "%'" _
& " OR AU_MATERIAL.DESCRIPCION Like '%" & palabra & "%'" _
& " OR AU_FORMATO_MATERIAL.DESCRIPCION Like '%" & palabra & "%'"
end if

i=i+1
Wend

Saludos
nICO