2015-11-17 36 views
1

我使用以下代码以降序排序目录中的所有文件,然后检查文件创建日期是否为今天的日期。如何使用VB.Net列出当前在目录中创建的文件

这可以改进,包括.Where()条件在最后只包括今天创建的文件?

代码

Dim orderedFiles = New System.IO.DirectoryInfo("C:\\MyFolder").GetFiles().OrderByDescending(Function(p) p.LastWriteTime) 
+0

在我的情况下系统日期将永远是正确的。 –

回答

2

基于您的代码只需使用Where(Function(p) p.CreationTime.Date = Now.Date)代替OrderByDescending(Function(p) p.LastWriteTime)

Dim orderedFiles = New System.IO.DirectoryInfo("C:\MyFolder") _ 
           .GetFiles() _ 
           .Where(Function(p) p.CreationTime.Date = Now.Date) 

Dim Dir As New DirectoryInfo("C:\MyFolder") 
Dim FilesInDir As FileSystemInfo() 
FilesInDir = Dir.GetFileSystemInfos 
Dim my_file = FilesInDir.Where(Function(p) p.CreationTime.Date = Now.Date) 
今天

Dim file_name As String 
file_name = my_file(0).FullName ' file in 0th position or you can loop thorough my_file 
  • 创建文件的

    • my_file店收集这将显示你绝对路径的文件名即C:\MyFolder\file.txt

  • 相关问题