MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    retirar acentos em combobox

    Compartilhe

    mcsanches
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 10/06/2012

    retirar acentos em combobox

    Mensagem  mcsanches em Qua 18 Maio 2016, 14:13

    caros amigos, tenho uma combobox de pesquisa com a seguinte consulta na "origem da linha"

    SELECT TabPessoa.codigo_pessoa, TabPessoa.vulgo, TabPessoa.nome FROM TabPessoa WHERE (((TabPessoa.vulgo) Like "*" & [Informe o nome desejado] & "*")) OR (((TabPessoa.nome) Like "*" & [Informe o nome desejado] & "*")) ORDER BY TabPessoa.nome;

    porem não me retorna os nomes com ou sem acentos,

    verifiquei no fórum o exemplo "com sem acentos"

    quem possui o codigo abaixo

    Private Sub txFiltro_Change()
    Dim strSql As String
    strSql = "SELECT idCliente, NomeCliente, Telefone FROM tblClientes WHERE " & _
    "strConv(NomeCliente, 2, 1042) like '*" & StrConv(Me!txFiltro.Text, 2, 1042) & "*';"
    Me!Lista.RowSource = strSql
    End Sub

    como faço para adaptar o codigo na minha combobox?

    atenciosamente

    Marcelo

    FabioPaes
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2300
    Registrado : 14/08/2013

    Re: retirar acentos em combobox

    Mensagem  FabioPaes em Qua 18 Maio 2016, 14:39

    SELECT TabPessoa.codigo_pessoa, TabPessoa.vulgo, TabPessoa.nome FROM TabPessoa WHERE strConv(TabPessoa.vulgo, 2, 1042) like '*" & [Informe o nome desejado] & "*" OR strConv(TabPessoa.Nome, 2, 1042) like '*" & [Informe o nome desejado] & "*" ORDER BY TabPessoa.nome;

    Tente assim!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

    mcsanches
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 10/06/2012

    Re: retirar acentos em combobox

    Mensagem  mcsanches em Qua 18 Maio 2016, 18:09

    Caro Fábio, inseri a query na "origem da linha" da combobox e apresentou erro de sintaxe

    FabioPaes
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2300
    Registrado : 14/08/2013

    Re: retirar acentos em combobox

    Mensagem  FabioPaes em Qua 18 Maio 2016, 18:36

    Posta aqui seu Exemplo.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

      Data/hora atual: Sab 03 Dez 2016, 19:38