MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

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 : 121
    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
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3336
    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 : 121
    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
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3336
    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: Ter 17 Out 2017, 08:56