Salve a tutti,
utilizzo questa porzione di codice, per leggere una dir, dove risiedono parecchi file (nell'ordine delle migliaia) la cui data va da oggi a circa 6 mesi fa. Quello che vorrei fare è restringere la lettura e quindi il caricamento nell'array, ai soli file che sono vecchi di 2 mesi, escludendo quindi gli altri.

E' possibile farlo modificando questo codice?

codice:
' Leggo il contenuto della directory e lo metto in un array
Dim strPath   'Path directory di ricerca
Dim objFSO    'Variabile FileSystemObject
Dim objFolder 'Variable directory
Dim objItem   'Variable per il loop nel contenuto della directory
strPath = "docuavvi/file/"

' Creo oggetto FSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

' Creo un gestore per la directory
Set objFolder = objFSO.GetFolder(Server.MapPath(strPath))

' Carico il contenuto del percorso in una matrice
Dim Listing (9999, 4)
num = 1
For Each objItem In objFolder.Files
    Listing (num, 1) = objItem.Name
    Listing (num, 2) = objItem.Size
    Listing (num, 3) = objItem.Type
    Listing (num, 4) = objItem.Path
    num=num+1
Next
    
num=num-1

' Fine, distruggo gli oggetti creati
Set objItem = Nothing
Set objFolder = Nothing
Set objFSO = Nothing

....

Grazie in anticipo per la collaborazione
ciao