Ver Mensaje Individual
  #2 (permalink)  
Antiguo 11/04/2007, 13:47
Avatar de Shiryu_Libra
Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 1 mes
Puntos: 88
Re: poner en negritas resultado de busqueda

Cita:
Iniciado por jtoribioa Ver Mensaje
Hola a todos, haber si alguien me puede ayudar tengo un pequeño buscador en una pagina y quisiera poner en negrita las palabras coincidentes pero no se como hacerlo, los resultados los recogo en un recordset y los imprimo con un while.


ojo que las palabras que se buscan estan dentro de una cadena de texto

por ejem yo quisiera buscar en paises "ar" y el resultado seria Argentina, Paraguay, etc
me entineden, espero que si
Saludos
asi lo intento amigo... espero te sirva

al recojerlo del formulario
Cita:
sebusca=request.Form("criterio")
sebusca=lCase(sebusca)
reemplazo="<strong><em>"&sebusca&"</em></strong>"
al buscarlo en la base
Cita:
while NOT RS.EOF
texto=lcase(RS("nombre").value)
texto=replace(texto,lcase(sebusca),lcase(reemplazo ))%>
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra

Última edición por Shiryu_Libra; 11/04/2007 a las 13:51 Razón: quitando una linea.. se me fue de paso...