MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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

    Importar arquivo com nome de datas

    avatar
    Caio Porto
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/12/2017

    Importar arquivo com nome de datas  Empty Importar arquivo com nome de datas

    Mensagem  Caio Porto Sab Abr 17, 2021 2:03 pm

    Pessoal,

    Estou com uma dúvida, é possível importar arquivo .csv com data no título? Hoje tenho uma base que importar alguns arquivos .csv para se atualizar, porém os arquivo sempre vem com data e hora no titulo, então todos os dias tenho que renomear manualmente retirando a parte das datas e deixando somente o nome do arquivo.

    Por exemplo o arquivo vem assim: "teste_2021-04-16-17-47.csv", e eu preciso renomeá-lo para "teste.csv" para que a importação no Access reconheça.

    Abaixo meu código atual:

    DoCmd.TransferText acImportDelim, "SGSI_SI", "TBL_SGSI_SI_BALDE", "D:\Arquivos\!_UTEP OESTE\!BD_Gestao_Obras_UTEP-OESTE\SGEO_ATUAL\Relatorios UTEP\SGSI_SI.csv", False, "", 1252

    Espero que possam me ajudar.

    Desde já, muito obrigado!

    Hoje utilizo Access 365.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Alexandre Neves Sab Abr 17, 2021 4:50 pm

    Boa tarde
    Com este código
    DoCmd.TransferText acImportDelim, "SGSI_SI", "TBL_SGSI_SI_BALDE", "D:\Arquivos\!_UTEP OESTE\!BD_Gestao_Obras_UTEP-OESTE\SGEO_ATUAL\Relatorios UTEP\SGSI_SI.csv", False, "", 1252
    Não sei como importa o arquivo "teste.csv"
    Quer mudar o título (dentro do ficheiro) ou o nome do ficheiro?


    .................................................................................
    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

    Caio Porto gosta desta mensagem

    avatar
    Caio Porto
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/12/2017

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Caio Porto Dom Abr 18, 2021 1:26 pm

    Bom dia!

    o arquivo teste.csv foi somente um exemplo, vamos ignora-lo e nos ater ao caso real.

    DoCmd.TransferText acImportDelim, "SGSI_SI", "TBL_SGSI_SI_BALDE", "D:\Arquivos\!_UTEP OESTE\!BD_Gestao_Obras_UTEP-OESTE\SGEO_ATUAL\Relatorios UTEP\SGSI_SI.csv", False, "", 1252

    Ele está importando o arquivo SGSI_SI.csv normalmente, mas esse arquivo sempre vem com a data e hora no título, ex: SGSI_SI.csv_2021-04-17-08-00, então eu tenho que ficar renomeando manualmente para SGSI_SI.csv para que o Access o importe.

    É possível o Access importar o arquivo com a data no titulo ?(Levando em consideração que as datas mudam todos os dias, logo nós temos uma parte do nome fixo que é o "SGSI_SI" e uma parte do nome variável que é a data e hora "_2021-04-17-08-00").
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Noobezinho Dom Abr 18, 2021 2:15 pm

    Olá Caio

    Apenas dando sugestões:
    Não sei, em que momento você o renomeia.
    Esse nome de arquivo, foi nomeado por alguém que não conhece programação.
    Digo isso porque a extensão está no meio:
    SGSI_SI.csv_2021-04-17-08-00
    Que deveria estar assim: SGSI_SI_2021-04-17-08-00.csv

    Tem outra coisa:
    O Access não aceita traços ( - ) no lugar dele temos que usar underline ( _ )
    É difícil ajudar mais por não saber exatamente o modus operandis  da coisa .

    O que precisa é automatizar  a modificação do nome evitando
    fazê-lo manualmente.

    Talvez mudar para:

    SGSI_SI_2021_04_17_0800.csv

    Talvez isso te de um Norte, caso contrário, explique-nos exatamente como você muda o nome.

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    Caio Porto
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/12/2017

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Caio Porto Dom Abr 18, 2021 2:38 pm

    Nobezinho,

    Desculpe o erro, mas o nome correto é o "SGSI_SI_2021-04-17-08-00.csv", eu que digitei "SGSI_SI.csv_2021-04-17-08-00" de maneira errada.

    Quanto ao momento em que eu renomeio o arquivo, é sempre antes da base de dados atualizar. Eu vou lá na pasta onde o arquivo está e o renomeio por meio do próprio Windows.

    Quanto a automatização da modificação do nome, sabe como posso fazer isso ?
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Noobezinho Dom Abr 18, 2021 2:47 pm

    Caio

    Deixe-me entender.

    "Eu vou lá na pasta onde o arquivo está e o renomeio pelo próprio Windows"

    Onde está essa pasta, no teu pc ou fora dele, onde?

    Como vc renomeia o arquivo?

    Aguardo...


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

    Caio Porto gosta desta mensagem

    avatar
    Caio Porto
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/12/2017

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Caio Porto Dom Abr 18, 2021 2:57 pm

    Vamos lá!

    1º-Sim, está no meu PC. No endereço "D:\Arquivos\!_UTEP OESTE\!BD_Gestao_Obras_UTEP-OESTE\SGEO_ATUAL\Relatorios UTEP";
    2º-Eu vou até o endereço citado acima, seleciono o arquivo em questão("SGSI_SI_2021-04-17-08-00.csv"), teclo F2, e o renomeio para "SGSI_SI.csv";

    Como eu disse, isso é feito de maneira manual, todos os dias.

    Então a minha necessidade é eliminar essa ação de ter que ir até essa pasta e renomear o arquivo dessa maneira.

    Acredito que as únicas maneiras disso acontecer é:

    1º- O Access procurar o arquivo "SGSI_SI_2021-04-17-08-00.csv" e importa-lo com base somente no seu titulo inicial antes da data que é "SGSI_SI";

    ou

    2º- Criar algum arquivo .bat para renomear esses arquivos, mas tenho pouco entendimento sobre isso então não sei como realizar.

    Aguardo retorno, se ficou ou gerou mais alguma dúvida, por favor, me sinalize.
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Noobezinho Dom Abr 18, 2021 3:03 pm

    Na pasta são mais de um arquivo?

    Todos começam com SGSI_SI?

    por favor, me passe alguns nomes de arquivos


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    Caio Porto
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/12/2017

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Caio Porto Dom Abr 18, 2021 3:16 pm

    Tem vários arquivos .txt na pasta, mas somente um com o nome "SGSI_SI"
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Noobezinho Dom Abr 18, 2021 7:48 pm

    Caio

    Eis teu código:

    Function AlteraNomes()
    Dim MyFolder As String
    Dim MyFile As String
    MyFolder = "D:\"
    MyFile = Dir(MyFolder & "Arquivos\!_UTEP OESTE\!BD_Gestao_Obras_UTEP-OESTE\SGEO_ATUAL\Relatorios UTEP\")

    Name MyFolder & MyFile As MyFolder & Left(MyFile, 7) & ".csv"

    End Function

    confira o caminho do arquivo se está correto.

    É só chamar a função

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    Caio Porto
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/12/2017

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Caio Porto Seg Abr 19, 2021 1:51 am

    Funcionou com somente 1 arquivo na pasta.

    Mas se houvessem outros arquivos de nomes diferentes a serem modificados, como ficaria ?
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Noobezinho Seg Abr 19, 2021 2:02 am

    Exatamente por isso que perguntei a você se teria mais de um arquivo com esse inicio de nome.

    E você disse que somente um.

    Então, teste o código abaixo.

    Function AlteraNomes()
    Dim MyFolder As String
    Dim MyFile As String
    MyFolder = "D:\"
    MyFile = Dir(MyFolder & "Arquivos\!_UTEP OESTE\!BD_Gestao_Obras_UTEP-OESTE\SGEO_ATUAL\Relatorios UTEP\SGSI_SI*.csv")
    Do While MyFile <> ""

       Name MyFolder & MyFile As MyFolder & Left(MyFile, 7) & ".csv"

    Loop

    End Function


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    Importar arquivo com nome de datas  Empty Re: Importar arquivo com nome de datas

    Mensagem  Noobezinho Seg Abr 19, 2021 11:41 pm

    Caio

    Foi resolvido?




    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

      Data/hora atual: Qua Jun 23, 2021 7:35 am