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

    Dúvida para subpastas

    Compartilhe

    baldocchi
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 34
    Registrado : 03/11/2014

    Dúvida para subpastas

    Mensagem  baldocchi em Qui 28 Jul 2016, 16:20

    Bom dia/Boa Tarde/Boa Noite a todos.

    Eu tenho um código, em anexo, que lista o conteúdo de um diretório no listbox.
    Eu procurei aqui no fórum mas não consegui encontrar algum tópico que solucione minha dificuldade.

    Eu preciso criar uma pesquisa de arquivos baseado em três parâmetros que o usuário digitar: Parte do Nome; Tipo de Arquivo; Pasta/SubPasta.

    O código é bem pequeno e simples.

    Dim xArquivos As String

    xArquivos = Dir$("c:\*.*")

    While xArquivos <> ""
    xArquivos = Dir$
    lstArquivos.AddItem xArquivos
    Wend

    Me.Requery




    O link para o mdb é: [Você precisa estar registrado e conectado para ver este link.]


    Fazer com que o VBA pegue o que o usuário digitar no TEXT, eu consigo.

    O que eu não consigo é listar os arquivos numa sub-pasta (sub-diretório) e abri-lo com dois cliques


    Agradeço a todos.
    Anexos
    Pesquisa Documentos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 5 vez(es)

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Dúvida para subpastas

    Mensagem  ahteixeira em Qui 28 Jul 2016, 16:43

    Olá Leandro Baldocchi,
    Não baixei o seu projecto, no entanto veja se link abaixo ajuda.
    Poderia usar uma tabela temporaria para receber os dados e depois poderia criar um form de pesquisa:
    [Você precisa estar registrado e conectado para ver este link.]
    Fica a sugestão.
    Abraço


    Última edição por ahteixeira em Ter 09 Ago 2016, 20:00, editado 1 vez(es)

    baldocchi
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 34
    Registrado : 03/11/2014

    Dúvida para subpastas

    Mensagem  baldocchi em Qui 28 Jul 2016, 17:23

    Muito obrigado, vou teste e te falo

    baldocchi
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 34
    Registrado : 03/11/2014

    Dúvida para subpastas

    Mensagem  baldocchi em Seg 08 Ago 2016, 15:47

    Pessoal, bom dia a todos.

    Desculpem minha burrice, alguns colegas me ajudaram, mas sou muito burro (estou aprendendo, um dia vou melhorar em VBA, prometo).

    Com a ajuda de alguns colegas eu consegui fazer o exemplo em anexo. ou o link: [Você precisa estar registrado e conectado para ver este link.]

    O que eu não sei fazer são duas coisas:

    1 - Listar os subdiretórios;

    2 - Fazer o loop de pesquisa quando o programa apenas dois arquivos.
    Por exemplo, numa pesquisa em que o usuário digite "teste", por exemplo, e o programa encontre apenas dois arquivos, o resultado é sempre um arquivo.
    Ele não mostra os dois arquivos.

    Se alguém puder ajudar agradeço demais.

    Obrigado desde já.

    Anexos
    Pesquisa Documentos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (42 Kb) Baixado 6 vez(es)

    Pablo Neruda
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 299
    Registrado : 17/09/2010

    Re: Dúvida para subpastas

    Mensagem  Pablo Neruda em Sab 13 Ago 2016, 14:38

    Baldocchi, não vou te dar o peixe, vou tentar te ensinar a pescar!!! rsrsr

    Dê uma olhada nesse exemplo....

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Elohim Manutenção & Sistemas
    ..............Powered by MS Access with VBA code..............
    ............http://www.elohimsistemas.com.br/...........

    baldocchi
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 34
    Registrado : 03/11/2014

    Re: Dúvida para subpastas

    Mensagem  baldocchi em Seg 15 Ago 2016, 15:34

    Olá Pablo Neruda, bom dia.

    Depois de estudar o exemplo que você deu, e ver outros exemplos que outros colegas deram, eu consegui chegar no exemplo em anexo.

    funciona assim:
    o usuário clica no botão da pasta para selecionar o diretório desejado
    depois, clica em "clique aqui para pesquisar".

    O programa monta a árvore assim:

    \\pasta\subpasta
    arquivo
    arquivo

    \\pasta\subpasta\subpasta
    arquivo
    arquivo
    arquivo
    arquivo




    e assim por diante
    Anexos
    PesqArquivos.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (65 Kb) Baixado 6 vez(es)

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: Dúvida para subpastas

    Mensagem  Alexandre Neves em Dom 21 Ago 2016, 18:29

    Boa tarde
    Se já estiver resolvido, marque o Resolvido


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    baldocchi
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 34
    Registrado : 03/11/2014

    Re: Dúvida para subpastas

    Mensagem  baldocchi em Ter 23 Ago 2016, 00:41

    Olá,

    ainda não está totalmente resolvido.
    Eu não sei como pesquisar por partes do nome do arquivo.
    Desculpa minha demora, mas estou aprendendo.

    Att

    Leandro

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: Dúvida para subpastas

    Mensagem  Alexandre Neves em Dom 28 Ago 2016, 10:08

    Bom dia
    para pesquisar por partes do nome, utilize caracteres coringa (?,*) com o operador like


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: Qui 08 Dez 2016, 23:58