Thumbs down Script para criação e cópia de pastas e ficheiros

[nmareis]

Boa tarde pessoal,

preciso de uma ajuda aqui para criar um script.bat:

no disco c: tenho várias pastas com o nome de vários concelhos, dentro dessas pastas tenho uma pasta para cadastro e outra para mapas, dentro de cadastro tenho ficheiros de extensão dwg e dentro da pasta mapas, 3 pastas ( manutenção, Ramais e Rede), e cada pasta tem ficheiros PDF.

gostava de criar um script para criar automaticamente a seguinte estrutura para gravar um cd:

"concelho" ( pasta )
dentro de concelho - uma pasta "cadastro" ( com os ficheiros dwg )
ainda dentro de concelho uma pasta " mapas " com as pastas (manutenção, ramais e rede) e cada uma com os pdfs lá dentro.
depois preciso disto para fazer para vários concelhos...ou seja ...ao clicar no script ele vai fazer este passo e cria estas pastas para vários concelhos automaticamente..no cd..


exemplo: Agueda( pasta ) - dentro desta:

\-->cadastro (pasta) - dentro desta os ficheiros dwg

\-->mapas(pasta) - dentro desta:

Manutenção ( pasta ) - com os pdfs
rede ( pasta ) - com os pdfs
ramais ( pasta ) - com os pdfs 

Coimbra (pasta).....etc...


é tipo..clico nele e ele copia apenas esta informação toda para o cd..com esta estruturação.
..se houvesse forma de ele apenas criar as pastas com a informação era o ideal...tipo...se não existir pasta manutenção ele não cria...só se ela lá estiver.


Cumprimentos,

Agradeço ajuda..

obrigado.

[hmsilva]

Olá nmareis,

vamos ver se compreendi...

Queres criar ferramentas (botões) em uma palete para copiar automaticamente uma directoria e sub-directorias para outra drive, correcto?

Falas em script e bat, tens que tentar se mais explicito para eu poder ajudar.

Para um bat, chega algo como

XCopy "C:\Agueda" "G:\Agueda\" /S

 G:\ será a drive de destino, e para fazer correr o bat, num botão escreve

^C^C_.shell;"C:/OsMeusBats//Agueda.bat";

 Se preferires em AUTOLISP, talvez algo assim

(defun c:Agueda ()
   (command "_.shell" (strcat "XCopy" " " "\"C:\\Agueda\"" " " "\"G:\\Agueda\\\"" " " "/S"))
  )

 Salva o código como Agueda.lsp, em uma das directorias de support, e para o botão

^C^C(c:Agueda)

Espero que ajude

Henrique

[nmareis]

não é para o cad colega...é mesmo para o windows...tenho uma série de
ficheiros pdfs em pastas separadas pelo pc que preciso copiar para uma
pasta apenas, para gravar num cd. Cada pasta onde estão os ficheiros
começa da seguinte forma:
001-RA-14-CBR...002-RA-14-FIG...004-RA-14-FIG....por aí fora....e os
pdfs estão aí dentro...
existe uma forma de copiar ao que parece...xcopy "pasta origem"\*.pdf
"pasta destino"...no entanto não sei como definir para o script apenas
procurar as pastas que contem -RA-14- ( apenas esta expressão, se é
que me entendes, para dar para todas as pastas, pois ela repete-se em
todas elas....se me pudesses ajudar agradecia...obrigado..
Apenas coloquei o post aqui porque a malta por aqui tem sido muito
assidua a ajudar-me ao contrário de outros foruns...

Cumprimentos,
e muito obrigado

[hmsilva]

Bat's, já não escrevo à muitos anos....

Mas para copiar as directorias para outra drive, talvez algo assim:

CD\
FOR /d %%a in (*-RA-14-*) DO XCOPY "%%a" D:\%%a\ /S

Modifica o nome da drive de destino para a correta D:\ para a que for.

Espero não estar muito esquecido... 🙂

Henrique

[KLUG-TICIANO]

A solução pode ser desta forma?

Enviarei-lhe um arquivo Excel, ou auto-cad.

Supondo Excel teremos:

1. Abrir Excel, arquivo “selecionar arquivos”;

2. A macro está neste arquivo;

3. Rodar macro “transferir”, clicando no "botão" criado;

4. No Box com “inserir pasta de consulta”, escreva a pasta de origem completa;

5. No Box com “inserir pasta de destino”, escreva a pasta de destino completa;

6. No Box com “inserir extensão a ser pesquisado”, escreva o desejado (pdf, xls, doc, etc);

7. No Box com “inserir texto” a ser pesquisado”, escreva o texto que todo arquivo deve conter, índiferente de maiúsculo ou minúsculo;

8. A macro vai ser executada e finalizada;

9. Na planilha “Lista de arquivo” temos todos os arquivos copiados para a pasta destino, que deve existir antes de rodar a macro;

10. Na pasta de destino temos os arquivos desejados...

Isto te atende??

[f_santana]

a parte de criar diretorios é bem simples

dentro do bloco de notas, voce deve digitar e depois salvar dentro do seu diretorio "concelho"

MD cadastro
MD mapas
MD mapas\Manutenção

MD mapas\rede

MD mapas\ramais

agora não entendi direito como os arquivos DWGs e PDF são gerados

existe esta PDF com a lista de comandos DOS, que voce pode usar para a criação do seu BAT https://jira.atlassian.com/secure/attachment/13343/Comandos%2Bdo%2BDOS%2B(bat).pdf

[nmareis]

agradeço..no entanto já consegui através de um bat...obrigado

[nmareis]

a situação é esta:

xcopy "C:\Processos entrada de
informacao\agueda\2014\ramais\001-RA-14-AGD\cadastro\*.*"
"C:\Processos entrada de informacao\cd\agueda\cadastro\ramais"
xcopy "C:\Processos entrada de
informacao\agueda\2014\ramais\001-RA-14-AGD\ramais\*.pdf*"
"C:\Processos entrada de informacao\cd\agueda\mdm\ramais"
xcopy "C:\Processos entrada de
informacao\agueda\2014\rede\01-14-AGD\cadastro\*.*" "C:\Processos
entrada de informacao\cd\agueda\cadastro\rede"
xcopy "C:\Processos entrada de
informacao\agueda\2014\rede\01-14-AGD\rede\*.pdf*" "C:\Processos
entrada de informacao\cd\agueda\mdm\rede"
xcopy "C:\Processos entrada de
informacao\agueda\2014\manutencao\001_RS_AGD_14\cadastro\*.*"
"C:\Processos entrada de informacao\cd\agueda\cadastro\manutencao"
xcopy "C:\Processos entrada de
informacao\agueda\2014\manutencao\001_RS_AGD_14\manutencao\*.pdf*"
"C:\Processos entrada de informacao\cd\agueda\mdm\manutencao"

agora os numeros 001 vão alterado todos os meses ( 002, 003, 004, 005
seguido da descrição RA-14-AGD)...queria algo que me dissesse que
aquele tipo de prefixo é para copiar...sem ter que andar sempre a
actualizar o script com os numeros das pastas.

Obrigado

[nmareis]

então ninguém sabe como resolver esta questão?

[KLUG-TICIANO]

Bom dia.

Acredito que muitos sabem como resolver esta questão, o que muitas vezes acontece é que nem sempre a questão vai no centro do problema.

O que é lógico para uns, principalmente na formulação da questão, não é lógico para outros...

Vale ressaltar que esta questão não é de auto-cad. Correto?

Procurei expor pelo caminho mais geral de utilzação, o que poderia ter inclusive outras possibilidade, para outros do fórum;

1) Caso a pessoa escrevesse no box de extensão ".pdf" seria apenas pdf, caso escrevesse ".pdf.xls", seriam as duas extensões a movimentar, e assim por diante, ou caso escrevesse "*",seriam todos os arquivos.

2) O tag típico de arquivo a copiar poderia ser qualquer um e não apenas o "001-RA-14-....". Caso fosse "*",seriam todos, independentemente do texto.

3) O tag típico do arquivo a copiar, como exemplo "001-RA-14- "poderia estar na planilha excel sendo, através da programação, lido e trabalhado.

4) Caso ele fosse  inserido na programação como "001-RA-14-", ele poderia ser inserido como "defaul", e depois trabalhado apenas os que tivessem índice a direita deste texto, com maior valor (001, 002, 003, etc) que seriam os mais recentes.

5) Outra possibilidade é uma caixa de questionamento logo após a inserção do tag (arquivo) a procurar. "Todos"? ou "Mais recentes"?...

O trabalho é sequencial, com muitas variações, e com muitas pessoas, colaboradores, sabendo como fazer...O que é difícl mesmo é a "comunicação"..

Como sempre!!

Em tempo: usamos isto com frequência, inclusive para comparar,posteriormente, revisões de documentos doc, xls, etc, automaticamente.