Ir para conteúdo
Fórum Script Brasil

Bruno DAlmeida

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Tudo que Bruno DAlmeida postou

  1. Valeu kuroi! Consegui por FSO.
  2. Galera, Procurar arquivos em um diretorio eu sei fazer, mas não sei procurar com o criterio de tamanho, ex.: arquivos maiores que 2Mb. Abaixo segue o que eu tenho mas fala colocar o criterio para achar maior que 2Mb. Grato, Bruno Sub FindFile() Set objExcel = CreateObject("Excel.Application") objExcel.Visible = True Set objSearch = objExcel.FileSearch objSearch.LookIn = "D:\Tmp\Teste" objSearch.SearchSubFolders = True objSearch.Filename = "*.mp3" objSearch.Execute For Each strFile In objSearch.FoundFiles MsgBox strFile Next objExcel.Quit End Sub
×
×
  • Criar Novo...