none
Renomear Pastas e ARQUIVOS RRS feed

 > 

  • Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Bom dia senhores.

    Estamos implantando Sistema de Qualidade na empresa e uma das exigências da norma de Certificação é que exista um padrão para pastas e arquivos, no meu caso especificamente o padrão seria Pastas Com Primeira Letra Maiúscula e ARQUIVOS COM TODAS LETRAS MAIÚSCULAS.  Existe algum programa, vbscript ou bat que ajude a fazer isso recursivamente?

    Desde Já Agradeço.

    Ex de pastas: C:\Usuário\Pasta do Usuário

    Ex de Arquivos: C:\ARQUIVOS DE USUARIO.exe

    quinta-feira, 27 de abril de 2017 14:32
    |

Todas as Respostas

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Bom dia!

    É só você executar esse script em .vbs, mais primeiro você cria um arquivo .txt cola o código abaixo dentro e salvar como a extensão .vbs e executar na pasta que deseja renomear os arquivos.   

    Set fso = CreateObject("Scripting.FileSystemObject")
For Each f In fso.GetFolder(".").Files
  f.Name = UCase(fso.GetBaseName(f)) & "." & fso.GetExtensionName(f) & "_"
  f.Name = Left(f.Name, Len(f.Name)-1)
Next

    terça-feira, 16 de julho de 2019 11:50
    |