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

    Pesquisa avançada na listbox com Combobox, usando o criterio "ou" para Textbox

    Compartilhe

    san vagandza
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 12
    Registrado : 17/11/2015

    Pesquisa avançada na listbox com Combobox, usando o criterio "ou" para Textbox

    Mensagem  san vagandza em Qui 07 Jan 2016, 17:16

    Ola pessoal, bom ano a todos!
    Obrigado pela ajuda que vocês tem me prestado. iniciou o ano, novos desafios.

    Como fazer uma pesquisa avançada no listview apartir duma ltextbox
    Eu estou a usar o seguinte código, mas não consigo descobrir onde esta o erro

    strSQL = "SELECT Campo1, Campo2, Campo3, Campo4 FROM Tabela WHERE ID>0"

    If Me. Cbo1<> "" Then
    strSQL = strSQL & " And Tabela. Campo1='" & Me. Cbo1& "'"
    End If

    If Me. Cb2<> "" Then
    strSQL = strSQL & " And Tabela. Campo2='" & Me. Cbo2& "'"
    End If

    If Me. Cb3<> "" Then
    strSQL = strSQL & " And Tabela. Campo3='" & Me. Cbo3& "'"
    End If

    If Me. text_procurar.Text <> "" Then
    filtro = "LIKE ('*" & Me.text_procurar.Text & "*')"
    strSQL = strSQL & "  Or Tabela.Campo4='" & filtro & "'"
    End If

    Os filtros com combobox funcionam perfeitamente, a minha duvida é fazer o filtro também com texbox usando o critério “ou”
    Alguém pode me ajudar?


    Aguardo

      Data/hora atual: Sex 09 Dez 2016, 07:38