使用GetFiles忽略文件

Question

我怎样才能切换这个函数，这样它就不会发现坏的文件，而是忽略它们。我现在拥有的不是忽视..。

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

Answer 1

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()

Answer 2

问题在于您的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

Answer 3

为什么不使用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属性，那么为什么不在System.IO命名空间下使用Path.GetExtension()，比如：

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