Destacar a busca independente de como foi escrito!

[luisfel 0]

Por exemplo digito na busca a palavra: teste (tudo em minusculo)

Trago todos os resultados relacionados, isto é:

 

Teste,TESTE,TeStE,testE,teste

 

estou usando

<% Response.Write replace((ObjRS1("assunto")),chave,"<font color=#006600>"&chave&"</font>")%>

 

Porém só a palavra "teste" dos resultados vem com a sua cor alterada... as que foram inseridas no banco com variações de minuscula e maiuscula aparecem, porém com a cor inalterada...

 

Gostaria de saber como retornar todas destacadas...Alguém pode me ajudar???

 

Obs: exemplo prático disso é o Google

 

Muito obrigado antecipadamente

[marcia.jordana 0]

Oi Luis

 

Eu utilizo o Ucase ou Lcase.

 

Exemplo:

 

<% Response.Write replace(lcase((ObjRS1("assunto"))),Lcase(chave),"<font color=#006600>"&Lcase(chave)&"</font>")%>

 

Espero que isso te ajude.

 

Tchau!

[natalensis 0]

Você pode aplicar a função replace mas com a sintaxe completa. Neste caso todas as ocorrências da chave serão substituídas pelo valor digitado.

 

<% Dim chave,Textochave="teste"texto= "Este é o texto de busca. Teste é uma das palavras do meuteste que terãotestes. TESTE também. O mesmo acontece com TeStE. testE, assim como teste, também sofrerão alterações. Se houvesse uma palavra ""testequalquer"" ela também seria modificada."Response.Write Texto & "<br><br>" & Replace(Texto,chave,"<span style='font weight:bold; BACKGROUND-COLOR: #efefef;'>"&chave&"</span>",1,-1,vbTextCompare)%>

Mas se você criar uma matriz com as palavras encontradas (utilize apenas uma ocorrência de cada uma delas) é possível deixá-las como foram digitadas. Neste caso você vai substituir chave por array(i) e não incluir a constante vbTextCompare.