data una cartella presente su server? diciamo una cartella piena di files?
devi usare il FileSystemObject (cerca fso) e usare la proprieta DatelastModified
codice:
Function ShowFileAccessInfo(filespec)
Dim fso, f, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(filespec)
s = UCase(filespec) & "
"
s = s & "Data di creazione: " & f.DateCreated & "
"
s = s & "Ultimo accesso: " & f.DateLastAccessed & "
"
s = s & "Ultima modifica: " & f.DateLastModified
ShowFileAccessInfo = s
End Function