Destacar "TEXTO"

[Hempinho 0]

ae fazendo favor, alguem pode me explica ou me dar um exemplo de como posso fazer pra tipo, eu digito uma palavra num "formulario de busca" ai ele busca no "mural" a palavra e retornar a palavra que busquei em "DESTAQUE". tipo o sistema de busca eu ja fiz funciona e tudo, só não sei fazer o texto que procurei retornar em "DESTAQUE".

[rafaelmagalhaes 0]

Use a função "Replace"Isso deve resolver...Té+

[Hempinho 0]

tá, mas nesse caso ai como usa-lá ? :/

[Mário Monteiro 179]

cara faça assim mesmo...antes de escrever na tela o que encontrouTexto = REPLACE(rs("texto"),Busca,UCASE(Busca))bem isto colocará a palavra usada na busca em maiusculo

[rafaelmagalhaes 0]

É isso mesmo que nosso amigo Mario postou.

[Hempinho 0]

to fazendo algo errado aqui ?

 

ASP [/tr][tr]mensagem = Replace(rs("mensagem"),Request.Form("palavra"),"<b>"&Request.Form("palavra")&"</b>")[/tr]

 

não ta funcionando :/

[Mário Monteiro 179]

que erro ta dando??

[tr374 0]

tenta assim:

ASP [/tr][tr]mensagem = Request.Form("palavra")

mensagem = Replace(rs("mensagem"),mensagem,<b>mensagem</b>)

[/tr]

[rafaelmagalhaes 0]

Aparentemente ta certo...q erro dá?

[Hempinho 0]

bom eu tava testando aqui ai postei um "Oi! e um emoticon" ai quando busco por Oi por exemplo ele não retorna o texto em negrito, ai se busco por i ele me retorna todos os i só que até o do nome da imagem. tipo <img src=imagens....> só que só funciona quando eu digito esse i, só que ai buga desse geito ai

[Hempinho 0]

:blink: ham ?

[Mário Monteiro 179]

tenta só o o e ve se pega??

 

ta estranho este erro...

[Hempinho 0]

somento o o não funciona. e se tento oi também não funciona.

[Mário Monteiro 179]

cara como disse ta estranho...faz um exemplo ai entra com um texto simples tipo "eu moro no brasil" e tenta buscar uma destas palavras... pra ver se vem destacada...

[Hempinho 0]

Bom eu escrevi o seguinte no mural: Oi! Esse post é pra testar.

ai eu digitei pra buscar assim esse pra ai me retorno a mensagem que não foi nada encontrado na busca. o SQL da busca ta como:

 

ASP [/tr][tr]sql = ("SELECT * FROM mural WHERE mensagem LIKE '%"&palavra&"%'")[/tr]

 

não to entendendo é mais nada :/

[Mário Monteiro 179]

ai tudo bem que não encontre...tente assim...sql = ("SELECT * FROM mural WHERE mensagem LIKE '%"& REPLACE(palavra," ","%") &"%'")veja se pega este seu teste

[Hempinho 0]

entao marioufpa eu tava fazendo os testes aqui ai o que ocorre é o seguinte quando a palavra contem letra MAIUSCULA tem que digita com essa letra em MAIUSCAULA tipo: Oi! Esse post é pra testar pra ele destacar eu tenho que digita "Esse" ou "Oi". mas quando eu procura por mais de uma palavra ex: "Esse pra" ai ele ja não destaca nenhuma das duas. como que faço pra ele aceitar mesmo quando eu digito a palacra em minusculo ? pra recusa se está maiusculo ou minusculo, pra ele destacar do mesmo geito. :)

[DackAle 0]

Bom sobre maiusculo minusculo...

 

Uma vez precisei fazer uma busca e pasei por estas dificuldades, vo ter dar uma ajuda, ve se consegue entender e adaptar, senaum da um berro =P

 

Link

 

Vendo isso pensa na logica das maisulucas e minusculas ;)

 

Abraços

[Hempinho 0]

bom me corrija se eu estiver errado mas olhando lá como não manjo muito eu tava pensando em fazer +/- assim:

 

preparaPalavra = Replace(str,"a","[A,a,á,à,ã,â,ä]")

preparaPalavra = Replace(str,"b","[B,b]")

preparaPalavra = Replace(str,"c","[C,c]")

 

não sei se é isso que você "kiz dizer" caso aja algo mais simples por favor. :)

outra coisa como faço pra usa mais de uma "function" em uma str ? por exemplo tenho la quebralinha(texto) ai usuario teste(quebralinha(texto)) ?

 

e outra coisa :/. tem como usar uma function pra duas str ? por exemplo tenho essa aqui.

ASP [/tr][tr]<%

function preparaPalavra(str)

preparaPalavra = replace(str,"a","[a,á,à,ã,â,ä]")

preparaPalavra = replace(preparaPalavra,"e","[e,é,è,ê,ë]")

preparaPalavra = replace(preparaPalavra,"i","[i,í,ì,î,ï]")

preparaPalavra = replace(preparaPalavra,"o","[o,ó,ò,õ,ô,ö]")

preparaPalavra = replace(preparaPalavra,"u","[u,ú,ù,û,ü]")

preparaPalavra = preparaPalavra

end function

%>

[/tr]

 

quero usar mais de uma str nessa function tem como ? ou tenho que faze uma outra function pra usar em outra str ?

 

bom desde ja valeu ai pela ajuda :)

[Mário Monteiro 179]

bem cara já que não ta resolvendo seu problemas, vamos apelar pros arrays da vida...

[tr][/tr][tr][/tr]

ASP	destacar = SPLIT(TRIM(Request.Form("palavra"))," ") sql = "SELECT * FROM mural WHERE " FOR I = LBOUND(destacar) TO UBOUND(destacar) If I > LBOUND(destacar) Then sql = sql & " AND " End If sql = sql & "mensagem LIKE '%"& destacar(I) &"%'" NEXT

depois você prepara a mensagem

[tr][/tr][tr][/tr]

ASP	mensagem = rs("mensagem") FOR I = LBOUND(destacar) TO UBOUND(destacar) mensagem = REPLACE(mensagem,destacar(I),"<b>"&destacar(I)&"</b>",-1,1) NEXT