如何查找文件夹中最旧的文件夹vb.net

Question

我正在尝试制作备份文件夹的程序。我想要说5个文件夹，那么如果它再次备份，我想要删除最旧的5个文件夹，并将新文件夹放入其中。

我将如何找到一个目录

Answer 1

使用System.IO.DirectoryInfo可帮助最古老的文件夹。

具体关于CreationTime财产和EnumerateDirectories方法。

下面是使用LINQ的EnumerateDirectories方法的修改示例：

' Create a DirectoryInfo of the Program Files directory. 
Dim dirPrograms As New DirectoryInfo("c:\program files") 

' LINQ query for oldest directory 
Dim dir = (From dir In dirPrograms.EnumerateDirectories()).Min(function (o) o.CreationTime).FirstOrDefault() 

If Not IsNothing(dir) Then 
' perform rest of function 
End If 

这里是一个非LINQ版本，以获得一个文件夹中最目录：

Dim di As New DirectoryInfo("C:\program files") 
    Dim dirs() as DirectoryInfo = di.GetDirectories() 
    Dim creationTime as DateTime = DateTime.Now 
    Dim oldestDir As DirectoryInfo 

    For Each dir As DirectoryInfo In dirs 
     If DateTime.Compare(dir.CreationTime(), creationTime) < 0 Then 
      oldestDir = dir 
      creationTime = dir.CreationTime() 
     End If 
    Next