MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Filtrar usando LIKE

    avatar
    ictsp
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 166
    Registrado : 02/09/2016

    [Resolvido]Filtrar usando LIKE Empty [Resolvido]Filtrar usando LIKE

    Mensagem  ictsp em 30/10/2020, 16:25

    Prezados colegas, estou tentando fazer uma filtragem usando o LIKE para selecionar alguns registros , porém não estou tendo sucesso .
    O código que estou utilizando é este:
    Código:
    strSQL = "SELECT EMPR,cod,cont,loc,data,ano FROM CADORÇ WHERE EMPR Like ('" & Me.teste.Text & "*')"

    A idéia era localizar nomes com o mesmo início. Exemplo:Selecionei João, teria que localizar João Paulo, João José.....

    Desde já, muito obrigado!!
    Carvalho
    Carvalho
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 19/01/2013

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  Carvalho em 30/10/2020, 16:29

    Boa tarde,

    tente assim:

    Código:

    strSQL = "SELECT EMPR,cod,cont,loc,data,ano FROM [CADORÇ] WHERE EMPR Like '*" & Me.teste.Text & "*';"

    avatar
    ictsp
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 166
    Registrado : 02/09/2016

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  ictsp em 30/10/2020, 17:05

    Boa tarde Carvalho!

    Desde já, muito obrigado pelo retorno. Testei sua sugestão e funcionou parcialmente
    [Resolvido]Filtrar usando LIKE Duvida14

    seleciono o nome na combo da esquerda e a primeira parte aparece na textbox, para realizar a filtragem.

    Com o seu código, ele filtrou, porém apareceu campos a mais. Gostaria que aparecesse só os destacados.
    Carvalho
    Carvalho
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 19/01/2013

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  Carvalho em 30/10/2020, 17:16

    pelo que vejo em sua tabela, tem que ser filtrado por outro jeito, por exemplo, esse código que passei ele filtra o que contem, se o texto é "MAG" tudo o que tiver no campo com essa sigla ele vai puxar, mais se colocar o que começa com ele vai puxar outro texto também como "MAGFORTE". faça o teste com esse código mesmo tirando apenas o primeiro * do código ficando assim.

    Código:


    strSQL = "SELECT EMPR,cod,cont,loc,data,ano FROM [CADORÇ] WHERE EMPR Like '" & Me.teste.Text & "*';"





    você vai entender o que estou tentando te dizer.
    Carvalho
    Carvalho
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 19/01/2013

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  Carvalho em 30/10/2020, 17:18

    seria interessante ele filtrar pelo campo cod
    avatar
    ictsp
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 166
    Registrado : 02/09/2016

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  ictsp em 30/10/2020, 17:37

    Carvalho, você sabe como posso representar um espaço vazio nesse código? Tirando o primeiro asteristico funcionou bem. Mas creio que logo após '" & Me.teste.Text & "*';" no lugar do asteristico, deveria colocar um espaço. Já tentei aspas duplas mas não deu certo.

    Carvalho
    Carvalho
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 19/01/2013

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  Carvalho em 30/10/2020, 17:43

    Tente assim:

    Código:


    '" & Me.teste.Text & " " & "*';"


    Ficará assim "MAG "

    Veja se dá certo.

    ictsp gosta desta mensagem

    avatar
    ictsp
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 166
    Registrado : 02/09/2016

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  ictsp em 30/10/2020, 18:12

    Carvalho, ficou perfeito!

    Muitissimo obrigado pela ajuda e paciência.

    Valeu mesmo cheers
    Código:

    Dim sqlr As String
    sqlr = "SELECT EMPR,cod,cont,loc,data,ano FROM [CADORÇ] WHERE EMPR Like  '" & Me.teste.Text & " " & "*';"
    a1.Form.RecordSource = sqlr
    a1.Requery

    Carvalho
    Carvalho
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 19/01/2013

    [Resolvido]Filtrar usando LIKE Empty Re: [Resolvido]Filtrar usando LIKE

    Mensagem  Carvalho em 30/10/2020, 18:20

    o fórum agradece.

      Data/hora atual: 29/11/2020, 15:55