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]Mover quantidade X de arquivos de uma pasta para outra

    =>Nois
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 09/11/2012

    [Resolvido]Mover quantidade X de arquivos de uma pasta para outra Empty [Resolvido]Mover quantidade X de arquivos de uma pasta para outra

    Mensagem  =>Nois em 7/7/2020, 13:23

    Bom dia!

    eu tenho uma pasta no meu servidor que recebe uma dezena de xml constante, tenho tambem uma rotina que os importa para meu sistema

    no entanto fica muito pesado e gera um travamento na minha base de dados

    A minha idéia era mover tipo de 10 em 10 para uma pasta determinada para fazer essa importação

    hoje o sistema faz a leitura de mais de 100 arquivos de uma vez e gera um travamento

    poderia ser em vba ou um Arquivo em .Bat


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Mover quantidade X de arquivos de uma pasta para outra Empty Re: [Resolvido]Mover quantidade X de arquivos de uma pasta para outra

    Mensagem  ahteixeira em 7/7/2020, 15:26

    Olá LM,

    Na minha opinião se está a fazer o travamento, deve verificar o código.

    Se pretende fazer por "lotes" pode criar um contador e com o Do While ou mesmo um IF resolve.
    Relativamente às pastas quando ficam muito cheias também é um problema.
    Normalmente para contornar a situação costumo criar sub-pastas a partir da localização principal (do aplicativo) com

    1 - Tipo de ficheiro
    2 - Ano
    3 - Ano-mes

    Ficando por Exemplo: \\NomeServidor\ArquivoOficios\2020\2020-07\NomeDoficheiroArquivar.extensão
    Em tempos ajudei um colega numa situação de "arquivo", não está muito limpo mas serve de estudo:
    https://www.maximoaccess.com/t23752-resolvidoformulario-com-sub-formulario-continuo-paralelo

    Para mover os ficheiros se tiver dúvidas, efetue uma "busca" no fórum ou veja por exemplo:
    https://www.maximoaccess.com/t1862p25-resolvidomover-arquivos-atraves-do-access
    https://www.maximoaccess.com/t24313-resolvidoexcluir-ou-mover-arquivo-externo-pelo-nome-e-data

    Abraço


    =>Nois
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    Registrado : 09/11/2012

    [Resolvido]Mover quantidade X de arquivos de uma pasta para outra Empty Re: [Resolvido]Mover quantidade X de arquivos de uma pasta para outra

    Mensagem  =>Nois em 7/7/2020, 16:31

    Obrigado ahteixeira,

    consegui resolver com o exemplo em anexo, fiz umas modificações me atendeu bem

    resolvido.
    Anexos
    [Resolvido]Mover quantidade X de arquivos de uma pasta para outra AttachmentCopiarMover.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (152 Kb) Baixado 3 vez(es)


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Mover quantidade X de arquivos de uma pasta para outra Empty Re: [Resolvido]Mover quantidade X de arquivos de uma pasta para outra

    Mensagem  ahteixeira em 7/7/2020, 16:59

    Olá LM,

    Obrigado pelo retorno e partilha da solução, o fórum agradece.

    cheers

      Data/hora atual: 4/12/2020, 08:15