Recupérer la date de modification d'un fichier avec vbs
Utilisateur anonyme
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
J'aimerais crée un petit programme sur une clé USB de tel a se que dés que je l'a branche, il me propose d'ouvrir le dernier fichier modifier sur la clé.
J'ai deja crée :
"response = MsgBox ("Ouvrir le dernier fichier modifié ?" , vbYesNo + vbQuestion, "Accès rapide")
If Response =6 then
msgbox "Yes selected"
else
msgbox "No selected"
end if"
Cependant, il me manque la partie pour trouver le dernier fichier modifier.
Merci pour l'aide :)
J'aimerais crée un petit programme sur une clé USB de tel a se que dés que je l'a branche, il me propose d'ouvrir le dernier fichier modifier sur la clé.
J'ai deja crée :
"response = MsgBox ("Ouvrir le dernier fichier modifié ?" , vbYesNo + vbQuestion, "Accès rapide")
If Response =6 then
msgbox "Yes selected"
else
msgbox "No selected"
end if"
Cependant, il me manque la partie pour trouver le dernier fichier modifier.
Merci pour l'aide :)
A voir également:
- Recupérer la date de modification d'un fichier avec vbs
- Comment réduire la taille d'un fichier - Guide
- Fichier .dat - Guide
- Fichier bin - Guide
- Fichier epub - Guide
- Suivi de modification word - Guide
1 réponse
Bonjour,
jette un oeil à ça :
jette un oeil à ça :
Option Explicit
Dim fso, path, file, recentDate, recentFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set recentFile = Nothing
For Each file in fso.GetFolder("C:\Temp").Files
If (recentFile is Nothing) Then
Set recentFile = file
ElseIf (file.DateLastModified > recentFile.DateLastModified) Then
Set recentFile = file
End If
Next
If recentFile is Nothing Then
WScript.Echo "no recent files"
Else
WScript.Echo "Recent file is " & recentFile.Name & " " & recentFile.DateLastModified
End If
Juste une question, Ma clé USB est organiser dans plusieurs dossiers, par exemple, vu que c'est une clé USB de cours, j'ai un dossier Anglais, Maths, ou toute autre dossier du style, alors quand j'indique au programme le dossier "travail" (la ou il y a tout mes dossiers et fichiers de cours), il m'indique donc " deskop.ini, alors que je voudrais quil fouille dans tout les dossier le plus recent.
Voila, désoler et merci ^^