RENOMEAR MAIUSCULOS
Galera alguem sabe onde posso pegar um codigo q faça uma busca num pasta e que tranforme o nome dos arquivos dela no mesmo nome mas com letras minusculas...?? valeu ae
Vamos exercitar a mente....
DIM FS as object
DIM FL as object
set FS = createobject("Scripiting.FileSystemObject")
for each fl in FS.GETFOLDER("c:\cunha").FILES
fl.name = ucase(fl.name)
' se não for name deve ser path...
next
SET FS = nothing
Tópico encerrado , respostas não são mais permitidas