[Resolvidos]Filtro e busca avançada

Olá amigos, boa noite

Estou elaborando um formulário de pesquisa

minha dúvida é a seguinte:

tenho 3 caixas de texto: "Nome", "Cidade", "UF"
e uma caixa de listagem com a seguinte consulta:

SELECT tblCONTATOS.Nome, tblCONTATOS.Endereco, tblCONTATOS.Cidade, tblCONTATOS.UF
FROM tblCONTATOS
WHERE (((tblCONTATOS.Nome) Like [Forms]![frmPESQUISA].[txt_3] & "*") AND ((tblCONTATOS.Cidade) Like [Forms]![frmPESQUISA].[txt_cidade] & "*") AND ((tblCONTATOS.UF) Like [Forms]![frmPESQUISA].[txt_nome] & "*"));

Então: Se todos os campos envolvidos na consulta estiverem preenchidos a consulta funciona normamente, mas se um o outro estiver vazio o registro não aparece na consulta.

como posso melhorar este código para aparecer o resgistro, mesmo se um o outro campo estiver vázio

Boa Tarde amigo

Vá por um caminho mais simples:

O Assistente do Access faz isso por si.

Veja este exemplo:

http://dl.dropbox.com/u/8157744/Unigest41_Backup.mdb

Irailson, me tira uma dúvida em que momento você esta atualizando o campo após a seleção dos dados que você quer?

Pois se sua list é o resultado da seleção dos campos, após cada atualização você deve recarregar a lista para lhe apresentar o resultado desejado...

ou seja

Sub PopulaLista()

Lista.recordsource = "SELECT tblCONTATOS.Nome, tblCONTATOS.Endereco, tblCONTATOS.Cidade, tblCONTATOS.UF" & _
" FROM tblCONTATOS" & _
" WHERE (((tblCONTATOS.Nome) Like '" & [Forms]![frmPESQUISA].[txt_3] & "*') AND ((tblCONTATOS.Cidade)" & _
" Like '" & [Forms]![frmPESQUISA].[txt_cidade] & "*') AND ((tblCONTATOS.UF) Like '" & [Forms]![frmPESQUISA].[txt_nome] & "*'));"

end sub

No evento after update de cada controle vc chama a sub para atualizar...

call PopulaLista

Agora uma dica, ao invés de textbox, pq você não usa combobox para a seleção dos parametros?

Espero ter ajudado

Sds,


Pablo

Olá amigos Vieira e Pablo,


vou verificar e estudar vossas instruções e assim que possivel retorno.
Um grande abraço pra voces.

obrigado pela atençao,

Irailson.

Olá, caros amigos Vieira e Pablo Boa Noite.

Antecipo o agradecimento pela atenção dispensada ao torno do assunto.

Verifiquei o recomendado, porém não "funfou", acredito que por não tê-los feitos compreender o assunto em pauta......

vou tentar explicar, sem as demandas da linguagem técnica do access e sim do que pretendo:

EX.: (fazendo referencias as tres caixas que tenho para pesquisar "Cidade, Nome, UF"),
Digito em Cidade: "Salvador", mas não coloco nada nas outras caixas, então espero que a consulta me traga os dados de quem mora em Salvador, porém por não ter digitado nada nas outras a "consulta" não retorna nenhum registro. será que é o código que estou usando (ver primeiro post)que esta errado?

Detalhe: se nos outros campos lá da tabela (que as caixas pesquisam) estiverem preenchidos, aí consulta retorna com os registros referente a quem mora em Salvador perfeitamente.

Aproveito o momento para reverenciar as pessoas, como vocês, que disponibilizam suas dadivas a pessoas, que como eu (iniciante) precisam.
Espero um dia poder estar na condição de vocês, que sabe até ser um mestre como JPaulo.........

Asta la vista...................

Amigo irailson

Não sei se fui que eu não percebi ou se você não deu a devida atenção ao exemplo. Aquilo que eu compreendi é que ao utilizar a combobox para preencher os campos, se estes não conterem todos os dados dá-lhe um erro. Se você reparar no exemplo enviado, retire os dados num campo da tabela e depois seleccione no form para verificar que mete os dados e mesmo com um campo em branco, não dá erro. Se você estudar o exemplo direitinho vai ver que é simples e descomplicado.

Abs

Olá Vieira,

Vou analisá-lo novamente depois retronarei,

Irailson

Olá Vieira,

O exemplo, em especifico, o form que voce se refere é o Factura, se for este, no qual faz uma atualização pela caixa cliente, não atende ao que necessito no momento.

Porém, há também uma macro abrirconsulta que não esta funfando, há o seguinte erro:

" O metodo ou ação requer o argumento nome da consulta "

mais abaixo: "você tentou utilizar o metodo Open requery ou ação abrirconsulta, mas deixou o nome do argumento em branco"


Grato,

Irailson

Amigo irailson

Não ligue à macro, pois a consulta está desactivada. Porque razão não atende? Você não tem que prencher as caixas de texto a partir de uma combo, utilizando a funçaõ Dlookup?

Olá boa noite, tenho várias consultas em meus sistemas por inumero parametros que funcionam bem, creio que vc esteja com dificuldade de montalas, tem como você postar seu BD para poder auxilia-lo melhor?

Amigo

Faça como o colega Pablo diz. Coloque aqui a sua base de dados para a gente analisar.

Abs

Dê uma olhada no exemplo!

Consulta Listbox_db001

Jugli o que vc enviou tem haver com o que vc questiona no inicio deste tópico? Se não o que vc gostaria de fazer nesse exemplo que enviou?!?!

No aguardo...

Caro Pablo

Não foi o Jungli que questionou, mas sim o Irailson. O Jungli só colocou um exemplo dele. Vamos aguardar que o proprietário do Tópico o Irailson, disponibilize a base de dados para que o possamos ajudar, caso contrário ninguém se vai entender neste post, nem nós, nem que o visitar futuramente.

Abraços

é verdade amigo Vieira...

e o exemplo:

é uma simples forma de fazer consultas em um listbox, e pode ser adaptado ao projeto do Iranilson.

e me desculpem... CORRIGI O link para o arquivo correto!

Olá amigo Jungli, obrigado pela atenção,


esse modelo que tú mandastes eu já aprendi a fazer,

estou vendo como mandar o meu BD pela net.

Vou tenta mandar o link com o arquivo


http://www.esnips.com/webfolder/3724b4d1-326c-4baf-b9a4-6fc1eaf65d6c



observem na tabela tlbCONTATOS o registro cod 11 e 11;

Cod Nome Cidade UF
10 marcos (vazio) BA
11 ze salvador(vazio)

*nota: (vazio) = não preenchido
observgem que o campo cidade não foi preenchido no cod 10 e UF no Cod 11
tentem filtrar lá no formulário o nome "marcos" ou "ZE". simplesmente eles não aparecem.

Aproveito para pedir-lhes desculpas se não me fiz entender, visto-me ainda na capa dos inciantes, cerca de 30 dias de estudo, e o que tem me encorajado és vossas ajudas,

Grato Irailson.

Amigo

Quando clico no link só aparece branco. Você copiou bem o link?

Olá Vieira,

Acabei de testar o link e funcionou....

Olá Vieira,

Veja este link:



http://www.esnips.com/doc/74f372c8-25fc-4327-b560-849e366257ca/Consulta-com-crit�rios-em-LISTBOX

Olá Vieira,

Veja este link:



http://www.esnips.com/doc/74f372c8-25fc-4327-b560-849e366257ca/Consulta-com-crit�rios-em-LISTBOX

Amigão:

Recebo esta mensagem

Bad Link

The link you clicked on is not complete.
If you clicked a link within an e-mail message, please verify that the link was not broken in the middle.
If it is broken, copy and paste the entire link into your browser.
You will be redirected to the eSnips home in a few seconds...

Não dá para baixar. Porque não coloca na dropbox?

Irailson,

Abra uma conta no Dropbox, é bem simples.

Depois da conta registrada é só fazer o Upload na pasta Public e

copiar o Link pra cá.

Sds,

Olá amigos,


vou fazer o cadastro no Dropbox e encaminhar.

Vejam este:

http://dl.dropbox.com/u/14428464/Consulta%20com%20crit%C3%A9rios%20em%20LISTBOX.mdb (dropbox)

ou: http://www.esnips.com/nsdoc/74f372c8-25fc-4327-b560-849e366257ca/?action=forceDL (esnips)

abraços...

Irailson,

Abra a listbox no modo design,

vá nas propriedades Origem da linha e

altere a SQL:

SELECT tblCONTATOS.Nome, tblCONTATOS.Cidade, tblCONTATOS.UF FROM tblCONTATOS WHERE (((tblCONTATOS.Nome) Like [Forms]![frmPESQUISA].[txt_3] & "*" Or (tblCONTATOS.Nome) Is Null) AND ((tblCONTATOS.Cidade) Like [Forms]![frmPESQUISA].[txt_cidade] & "*" Or (tblCONTATOS.Cidade) Is Null) AND ((tblCONTATOS.UF) Like [Forms]![frmPESQUISA].[txt_nome] & "*" Or (tblCONTATOS.UF) Is Null));

Sds,

Olhe se é assim que você deseja... amigo


Irailson

olá amigos chsestrem e JUNGLI, obrigado pela atençãode vocês.

o código SQL de chsestrem foi o que chegou mais perto, porém quando quero apenas consultar o estado, Ex.: BA o nome de "ZE" aparece, contudo o registro de "ZE" no campo UF esta vázio, então não deveria aparecer o registro dele.

Será que não é possivel fazer desse jeito esse tipo de consulta?

Continuo daqui pesquisando na net e testando outras maneiras...

Obrigado pela atenção de todos

Irailson...

Amigão,

vc queria que aparecessem os registros nulos, mas na boa

amigo notei que vc está usando SendKeys pra filtrar a listbox.

Este método é muito propenso a erros.

Eu tenho um formulario de pesquisa muito bom aqui, que adptei

baseado em um exemplo do Plinio Mabesi. Ao invés de listbox ele

usa um subformulário muito mais fácil de configurar as

propriedades além das vantagens de criar um Lay_out

confortável aos olhos do utilizador. Vou disponibilizá-lo

assim que puder OK.

Olá chsestrem, bom dia

Vou ficar no aguardo..



Obrigado pela atenção

Bom dia Amigão,

Veja como ficou agora

Aqui

Sds,

Olá Charles, bom dia amigão

Seu código está excpecional!!! Resolveu o "x" da questão; consegue-se filtrar por cada "caixa.



mas sem querer ser chato,

é possivel conjulgar as caixas para filtrar, tipo assim:

o resultado do filtro seria os dados inseridos nas caixa nome, cidade e UF,
ou em duas, tipo: nome e cidade, ou cidade e UF, nome e UF?

Um forte abraço,

Irailson

Amigo com relação ao SQL que vc falou que estava pegando nulo...

SELECT tblCONTATOS.Nome, tblCONTATOS.Cidade, tblCONTATOS.UF FROM tblCONTATOS WHERE (((tblCONTATOS.Nome) Like [Forms]![frmPESQUISA].[txt_3] & "*" Or (tblCONTATOS.Nome) Is Null) AND ((tblCONTATOS.Cidade) Like [Forms]![frmPESQUISA].[txt_cidade] & "*" Or (tblCONTATOS.Cidade) Is Null) AND ((tblCONTATOS.UF) Like [Forms]![frmPESQUISA].[txt_nome] & "*" Or (tblCONTATOS.UF) Is Null));

Não seria excluir a ultima condição onde esta incluso os nulos...

Irailson:

Elas já fazem isso amigo,

Mas veja as regras de agrupamento:

Vc começa pela UF, depois Municipio, e depois o nome etc.

Não tem sentido filtrar nome de um cliente e depois o estado entendeu?

Adicione na tabela 5 Marias com sobrenomes diferentes

e que morem no mesmo estado

Dai no formulario selecione primeiramente o estado e depois as Marias.

Pablo:

Amigão,

O maior problema do formulario não é O SQL e sim o

SendKeys que ele estava usando

Se vc baixou o formulario, experimente escrever qualquer nome

e depois dar um espaço pra ver o que acontece.

Espero ter ajudado

Olá amigos Charlie e Pablo,

o exemplo (de Charlies) atende ao pretendido, com filtros em UF e Cidade eu chego até o nome da(s) pessoas.

Aproveito para me desculpar das falhas que ora cometi no desenrola deste tópico, mas asseguro que tenho evoluido... e até já contribuir com outros usuários "em duvidados".

Obrigado,forte abraços e até a próxima dúvida (deve ser sobre relatório).

Irailson

Valeu amigo,

Este forum já faz parte do meu dia a dia, já aprendi em implementei muita coisa com as respostas e dicas dos nossos colegas.

Concerteza é um grande aprendizado

Bom trabalho pra vc.

Valeu bom final de semana...