Função Que Busca Palavras Acentuadas E Sem Acento

[.Andreia.]

meio complicado mas vou tentar explicar. A um tempo atrás vi um colega aqui do fórum postando uma duvida e nesta havia uma função que hoje preciso. Já procurei de tudo quanto é jeito, já vasculhei 4 meses de tópicos do meu painel de controle e não há meio de encontrar.

A função fazia o seguinte. O usuário faz uma busca pela palavra (exemplo) céu.

Na SQL ficaria mais ou menos assim:

palavra1 = request.form("palavra1")
palavra2 = Funcao(palavra1)

sql = "select * from tabela where palavra = '" &palavra1& "'" or palavra = '"& palavra2 "'"

ou seja, a consulta realiza a seguinte busca:

select * from tabela where palavra = 'céu' or palavra='ceu'

Acho que já deu pra entender... ele busca a palavra sem acento, porque isso faria diferença no resultado.

Se alguém tiver uma função parecida, ou souber aonde está esse link... agradeço. já procurei na net tb... e tá dificil.

[kuroi]

da uma olhada aqui:

http://scriptbrasil.com.br/forum/index.php...15entry226699

ve se ajuda...

[kuroi]

o esquema acho q e você mesmo fazer a funcao. e meio tonto, mas você teria q substituir todas a possibilidades de acentos. tipo:

Private Function Funcao(palavra1)
   palavra1 = replace(palavra1, 'á', 'a')
   palavra1 = replace(palavra1, 'ã', 'a')
   palavra1 = replace(palavra1, 'à', 'a')
   palavra1 = replace(palavra1, 'â', 'a')
...
...
   palavra1 = replace(palavra1, 'ó', 'o')
....
    Funcao = palavra1
End Function

[.Andreia.]

Vl kuroi, esse link do CyberAlexxx já resolveu

Ah essa função que você passou eu já vi algo parecido, mas você usou sintaxe de VB

vlws

[kuroi]

Ah essa função que você passou eu já vi algo parecido, mas você usou sintaxe de VB

é o costume...

[bareta]

o que da pra você fazer é colo car tudo em um array e depois fazer a verificação tipo