Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it
    Registrato dal
    Oct 2002
    Messaggi
    752

    [VBA]ricerca files attraverso data di creazione

    Ciao
    Ho questo codice che dovrebbe mostrarmi i files piu' vecchi di 10GG presenti nel disco F:\.
    Funziona ma cerca i files solo nella root del disco e nella prima cartella del disco ignorando le altre cartelle e le sottocartelle.
    Come posso fare a vedere tutti files presenti nel disco??

    Grazie anticipatamente
    Comunque Grazie

  2. #2
    Utente di HTML.it
    Registrato dal
    Oct 2002
    Messaggi
    752
    Scusate ecco il codice:

    Dim oFs
    Dim oFolder
    Dim oFile
    Dim Folder
    Dim FolderSpec
    Dim FileCollection

    FolderSpec = "E:\"
    Set oFs = CreateObject("Scripting.FileSystemObject")

    If oFs.FolderExists(FolderSpec) Then
    Set oFolder = oFs.GetFolder(FolderSpec)
    Set FileCollection = oFolder.SubFolders
    On Error Resume Next
    For Each subfolders In FileCollection
    For Each oFile In subfolders.Files
    If DateDiff("d", FileDateTime(oFile), Now) > 1 Then
    MsgBox (oFile)
    End If
    Next
    Next
    End If
    Comunque Grazie

  3. #3
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Lo devi rendere ricorsivo ...

  4. #4
    Utente di HTML.it
    Registrato dal
    Oct 2002
    Messaggi
    752
    Scusa la mia impreparazione.
    Potresti essere un pochino più esaustivo?
    Magari se mi suggerieci della dicumentazione o degli esempi.
    Grazie
    Comunque Grazie

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.