Acentuação

[Theotokos]

Boa noite, e ótimo carnaval a todos......

como posso verificar em uma pesquisa qdo o usuário digita palavras com acentuação ou sem acentuação, exemplo, uma pesquisa de cliente onde o usuário pode digita:

José Antonio... , Jose Antônio... , Jose Antonio...

sendo que muitas vezes se trata da mesma pessoa, ou ainda queremos mostrar todos os José Antônio, independente da acentuação...

existe alguma função que permita comparar a string sem acentuação?

[Jmsilva]

http://fivewin.com.br/index.php?/topic/28336-pequisa-avençada/

Veja meu POST, veja se ajuda.

[Theotokos]

vlw, @Jmsilva

talvez não tenha entendido, mas a questão é que o Usuário vai digital em um campo de pesquisa, ora o usuário digita José Antônio, ora vai digitar Jose Antonio, para fazer a pesquisa, e gostaria que o sistema retornasse a pesquisa entendendo que a mesma pessoa, independente da acentuação... Então penso que ao digitar com acentuação, o sistema teria que converter os caracteres sem a acentuação e fazer a pesquisa....

 

[alex2002]

Olá,

Vc pode usar a função abaixo para validar tanto o campo digitado quanto a comparação. Se for em SQL vc tem que criar esta função também no SQL para comparar.

Um abraço,

Alexandre Pereira

 

////////////////////////////DADOS DA FUNCAO////////////////////////////////////////////
// NOME       : TiraAcentoUTF                                                        //
// SINTESE    : Retirar acentos e cedilhas                                           //
// PARAMETROS : <1> cTexto para retirar os acentos                                   //
// RETORNO    : cTexto sem acentos ou cedilhas                                       //
///////////////////////////////////////////////////////////////////////////////////////
function TiraAcentoUTF( cTexto )

cTexto := StrTran(cTexto,"ã","a")
cTexto := StrTran(cTexto,"ä","a")
cTexto := StrTran(cTexto,"à","a")
cTexto := StrTran(cTexto,"á","a")
cTexto := StrTran(cTexto,"ª","a")
cTexto := StrTran(cTexto,"â","a")
cTexto := StrTran(cTexto,"¦","a")
cTexto := StrTran(cTexto,"è","e")
cTexto := StrTran(cTexto,"é","e")
cTexto := StrTran(cTexto,"ê","e")
cTexto := StrTran(cTexto,"ë","e")
cTexto := StrTran(cTexto,"ì","i")
cTexto := StrTran(cTexto,"í","i")
cTexto := StrTran(cTexto,"î","i")
cTexto := StrTran(cTexto,"ï","i")
cTexto := StrTran(cTexto,"ò","o")
cTexto := StrTran(cTexto,"§","o")
cTexto := StrTran(cTexto,"õ","o")
cTexto := StrTran(cTexto,"ö","o")
cTexto := StrTran(cTexto,"ó","o")
cTexto := StrTran(cTexto,"º","o")
cTexto := StrTran(cTexto,"ô","o")
cTexto := StrTran(cTexto,"õ","o")
cTexto := StrTran(cTexto,"ø","o")
cTexto := StrTran(cTexto,"ù","u")
cTexto := StrTran(cTexto,"ú","u")
cTexto := StrTran(cTexto,"ü","u")
cTexto := StrTran(cTexto,"û","u")
cTexto := StrTran(cTexto,"ç","c")
                            
                                     
cTexto := StrTran(cTexto,"Ã","A")
cTexto := StrTran(cTexto,"Ä","A")
cTexto := StrTran(cTexto,"À","A")
cTexto := StrTran(cTexto,"Á","A")
cTexto := StrTran(cTexto,"Â","A")
cTexto := StrTran(cTexto,"È","E")
cTexto := StrTran(cTexto,"Ë","E")
cTexto := StrTran(cTexto,"É","E")
cTexto := StrTran(cTexto,"Ê","E")
cTexto := StrTran(cTexto,"Ì","I")
cTexto := StrTran(cTexto,"Í","I")
cTexto := StrTran(cTexto,"Î","I")
cTexto := StrTran(cTexto,"Ï","I")
cTexto := StrTran(cTexto,"Ò","O")
cTexto := StrTran(cTexto,"Õ","O")
cTexto := StrTran(cTexto,"Ó","O")
cTexto := StrTran(cTexto,"Ô","O")
cTexto := StrTran(cTexto,"Ö","O")
cTexto := StrTran(cTexto,"Ù","U")
cTexto := StrTran(cTexto,"Ú","U")
cTexto := StrTran(cTexto,"Ü","U")
cTexto := StrTran(cTexto,"Û","U")
cTexto := StrTran(cTexto,"Ç","C")

cTexto := StrTran(cTexto,"«"," ")
cTexto := StrTran(cTexto,"®"," ")
cTexto := StrTran(cTexto,""," ")
cTexto := StrTran(cTexto,"¬"," ")
cTexto := StrTran(cTexto,"¯"," ")
cTexto := StrTran(cTexto,"ý"," ")
cTexto := StrTran(cTexto,","," ")
cTexto := StrTran(cTexto,"'"," ")
cTexto := StrTran(cTexto,"`"," ")
cTexto := StrTran(cTexto,"/"," ")
cTexto := StrTran(cTexto,"\"," ")
return cTexto