Theotokos Posted February 24, 2020 Report Share Posted February 24, 2020 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? Quote Link to comment Share on other sites More sharing options...
Jmsilva Posted February 24, 2020 Report Share Posted February 24, 2020 http://fivewin.com.br/index.php?/topic/28336-pequisa-avençada/ Veja meu POST, veja se ajuda. Quote Link to comment Share on other sites More sharing options...
Theotokos Posted February 25, 2020 Author Report Share Posted February 25, 2020 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.... Quote Link to comment Share on other sites More sharing options...
alex2002 Posted February 25, 2020 Report Share Posted February 25, 2020 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 Theotokos 1 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.