Bonjour,
voilà, je cherche le moyen de supprimer tout le contenu d'un dossier, sauf le dernier fichier ajouté dedans. Ceci, en me basant sur la date de création du fichier.
Donc j'ai bien trouvé le code pour lister tous mes fichiers et les effacer tous, mais j'aimerais pouvoir trier la liste des fichiers trouvés par ordre décroissant de date de création et les effacer tous sauf le premier (ou l'inverse par date de création, sauf le dernier).
j'ai vu qu'il existe dans GetFiles une fonction ".OrderByDescending" mais impossible de comprendre comment cela fonctionne.
J'ai cherché sur le forum et sur google mais je ne comprend pas les exemples donnés...
Pouvez-vous m'aider ?
Voici mon code actuel :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Private Function Dossier_Supprimer_Contenu() As String Dim strProcessError As String = "" Dim urlDossier As String = "D:\monsite\upload" Try If System.IO.Directory.Exists(urlDossier) Then Dim files = From file In Directory.GetFiles(urlDossier) For Each file In files If System.IO.File.Exists(file) Then System.IO.File.Delete(file) End If Next files = Nothing End If Catch ex As Exception strProcessError = "<br><span style='color:#FF0000;'>Erreur : " & ex.Message & "</span>" End Try Return strProcessError End Function
Partager