Récupérer l'heure de modification d'un fichier
Bonjour à tous
Le code suivant me permet de récupérer la date et l'heure de modification du
fichier.
Comment peux-t-on extraire uniquement l'heure de modification
afin de pouvoir la comparer avec l'heure du système
Merci pour vos réponses
Code:
1
2
3
4
5
6
7
8
| Set oFSO = CreateObject("Scripting.FileSystemObject")
stFichier = "c:\LOG6460.TXT"
If oFSO.FileExists(stFichier) Then
Set oFl = oFSO.GetFile(stFichier)
Hor = oFl.DateLastModified
WScript.Echo Hor
End if |
