使用 GetFiles 忽略文件

本文关键字:文件 GetFiles 使用 | 更新日期: 2023-09-27 18:34:11

我怎样才能切换这个函数,而不是找到坏文件,而是忽略它们。我目前拥有的并没有忽视..

Dim files As System.IO.FileInfo() = directory.GetFiles.Where(Function(fi) fi.Extension.ToLower <> ".bad1" Or fi.Extension.ToLower <> ".bad2" Or fi.Extension.ToLower <> ".bad3").ToArray

使用 GetFiles 忽略文件

Dim files As System.IO.FileInfo() = directory.GetFiles().Where(Function(fi) Not (fi.Extension.ToLower() = ".bad1" OrElse fi.Extension.ToLower() = ".bad2" OrElse fi.Extension.ToLower() = ".bad3")).ToArray()

问题是你的Not Equal + OR .

OR更改为AND,它将排除。

Dim files As System.IO.FileInfo() = directory.GetFiles.Where(Function(fi) fi.Extension.ToLower <> ".bad1" AND fi.Extension.ToLower <> ".bad2" AND fi.Extension.ToLower <> ".bad3").ToArray

为什么不使用AND而不是OR,因为您试图忽略所有坏文件,例如:

Dim files As System.IO.FileInfo() = directory.GetFiles().Where(Function(fi) fi.Extension.ToLower <> ".bad1" And fi.Extension.ToLower <> ".bad2" And fi.Extension.ToLower <> ".bad3").ToArray

顺便说一下,此上下文fi参数没有Extension属性,那么为什么不使用 Path.GetExtension() System.IO命名空间下,如下所示:

Dim files As System.IO.FileInfo() = directory.GetFiles().Where(Function(fi) Path.GetExtension(fi) <> ".bad1" And Path.GetExtension(fi) <> ".bad2" And Path.GetExtension(fi) <> ".bad3").ToArray