Substituindo Valores Da Busca

[cyberalexxx]

Galera, to fazendo uma coisa aki, mais ta ridículo, muita linha pra fazer pouca coisa

O que eu estou querendo:

Vamos supor que em um registro tenha o seguinte texto "hoje tive um dia de cão"

depois em formulário de busca eu faça a busca pela palavra cao (sem acento),

até ai beleza, usando like eu consigo localizar o registro.

eu quero agora quando listar o resultado deixar a palavra cão em negrito, quando a busca é exata tipo o cara digita na busca cão é mole, é so fazer um replace inserindo os código para deixar em negrito.

eu consegui fazer usando uma gambiarra lascada da até vergonha de mostrar trocentos ifs e Instr.

alguém conhece uma lógica simples de fazer isso, as vezes a resposta esta embaixo do meu nariz e eu to me matando pelo caminho mais longo.

Acho q isso serve como um mini-desafio

Abraços

[felipefrancesco]

Cyber,

Gostei do desafio e se eu entendi direitinho o esquema, fiz um códigozinho ai q dá pra transformar em uma função, dá uma olhada:

<%
strValor           = "dia"
strResultado    = "hoje tive um dia de cao"
intTamValor     = len(strValor)
intTamRes       = len(strResultado)
intOcorrencia   = inStr(strResultado, strValor)
strFinal = left(strResultado, intOcorrencia - 1) & "<b>" & _
           mid(strResultado, intOcorrencia, intTamValor) & "</b>" & _
           mid(strResultado, (intTamValor + intOcorrencia), intTamRes)
response.write strFinal
%>

[cyberalexxx]

Cyber,

Gostei do desafio e se eu entendi direitinho o esquema, fiz um códigozinho ai q dá pra transformar em uma função, dá uma olhada:

<%
strValor           = "cao"
strResultado    = "hoje tive um dia de cão"
intTamValor     = len(strValor)
intTamRes       = len(strResultado)
intOcorrencia   = inStr(strResultado, strValor)
strFinal = left(strResultado, intOcorrencia - 1) & "<b>" & _
           mid(strResultado, intOcorrencia, intTamValor) & "</b>" & _
           mid(strResultado, (intTamValor + intOcorrencia), intTamRes)
response.write strFinal
%>

não é bem isso, o seu código eu resumiria assim:

<%
strValor = "dia"
strResultado = "hoje tive um dia de cao"
negrito="<b>"&strvalor&"</b>"
strFinal = replace(strResultado,strvalor,negrito)
response.write strFinal
%>

A maior duvida é a seguinte, vou partir do seu script para você entender melhor (com as alterações q vou fazer ele vai dar erro):

<%

strValor           = "cao" ' a palavra esta sem acento, supondo que o valor tenha sido recuperado via request de um form de busca

strResultado    = "hoje tive um dia de cão" já a palavra no campo esta com acento, e agora???

intTamValor     = len(strValor)

intTamRes       = len(strResultado)

intOcorrencia   = inStr(strResultado, strValor)

strFinal = left(strResultado, intOcorrencia - 1) & "<b>" & _

          mid(strResultado, intOcorrencia, intTamValor) & "</b>" & _

          mid(strResultado, (intTamValor + intOcorrencia), intTamRes)

response.write strFinal

%>

Entendeu o problema???