[VB6] Ottenere la data di un preciso file

[SuperMariano81]

ciao!
vorrei sapere la data di un preciso file!
per ora uso questa funzione che mi spulcia tutta la dir:

strPath = "D:\"
Set f = FileObject.GetFolder(strPath)
Set fc = f.Files
For Each f1 In fc
    If InStr(f1.Name, "ultima_foto.jpg") Then
    data_file = f1.DateLastModified
...

next

mi basta sapere la data della file ultima_foto.jpg.

[wallrider]

strPath = "D:\"
Set fl = FileObject.GetFile(strPath & "ultima_foto.jpg")
data_file = f1.DateLastModified

per modificare il tuo codice il meno possibile...

ma può tornarti utile la funzione FileDateTime

[SuperMariano81]

grassie 1000