MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    retirar acentos em combobox

    avatar
    mcsanches
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

    retirar acentos em combobox Empty retirar acentos em combobox

    Mensagem  mcsanches 18/5/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
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    retirar acentos em combobox Empty Re: retirar acentos em combobox

    Mensagem  FabioPaes 18/5/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!
    avatar
    mcsanches
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

    retirar acentos em combobox Empty Re: retirar acentos em combobox

    Mensagem  mcsanches 18/5/2016, 18:09

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


    Respeito às regras : Respeito às Regras 100%

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

    retirar acentos em combobox Empty Re: retirar acentos em combobox

    Mensagem  FabioPaes 18/5/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!

    Conteúdo patrocinado


    retirar acentos em combobox Empty Re: retirar acentos em combobox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 10:49