Vb.net System.IO.Directory.GetFiles不'；我找不到任何文件

我有一个问题，我有2个GetFile，似乎无法找到任何文件。我已经对这两个问题行进行了评论。我在sourcedir中有一个文件，在sourcedir的子文件夹中有一个文件。如果我去掉FileIO.SearchOption.SearchAllSubDirectories，它将在sourcedir中找到该文件，但不会在子文件夹中找到。对于FileIO.SearchOption.SearchAllSubDirectories，它找不到任何文件。我以管理员身份运行VS2013

'For some reason, this finds no files--> '

Dim xFilesCount = System.IO.Directory.GetFiles(sourcedir, FileIO.SearchOption.SearchAllSubDirectories).Length
Dim xFilesTransferred As Integer = 0

'For some reason, this finds no files'

For Each xFiles In System.IO.Directory.GetFiles(sourcedir, FileIO.SearchOption.SearchAllSubDirectories)
     System.IO.File.Move(xFiles, xNewLocation & "\" & System.IO.Path.GetFileName(xFiles))
     xFilesTransferred += 1                    

编辑：

多谢各位！我最终使用了以下代码，以防其他人遇到同样的问题

Dim xFilesCount = System.IO.Directory.GetFiles(sourcedir, "*.pf_import", System.IO.SearchOption.AllDirectories).Length
            Dim xFilesTransferred As Integer = 0

            For Each xFiles In System.IO.Directory.GetFiles(sourcedir, "*.pf_import", System.IO.SearchOption.AllDirectories)

                System.IO.File.Move(xFiles, xNewLocation & "\" & System.IO.Path.GetFileName(xFiles))
                xFilesTransferred += 1

                ProgressBar1.Value = xFilesTransferred * 100 / xFilesCount
                ProgressBar1.Update()
                Application.DoEvents()
            Next

使用

问题1 当前缺少一个参数

因为：

重要提示：

请将

选项Strict放在

上，作为代码模块的第一行。这将帮助您避免这些错误。理想情况下，在项目选项中将

选项设置为Strict On

，以便将其应用于所有文件。如果没有上明确的

选项和

上严格的

选项，切勿在大型项目上工作。（我还建议
选项推断关闭
）

问题2
与GetFiles（）一起使用的正确常量为

System.IO.SearchOption.AllDirectories

而不是

FileIO.SearchOption.searchAll子目录

快乐编码
 使用

问题1
当前缺少一个参数

因为：

重要提示：

请将
选项Strict放在
上，作为代码模块的第一行。这将帮助您避免这些错误。理想情况下，在项目选项中将
选项设置为Strict On
，以便将其应用于所有文件。如果没有

上明确的

选项和

上严格的

选项，切勿在大型项目上工作。（我还建议
选项推断关闭
）

问题2
与GetFiles（）一起使用的正确常量为

System.IO.SearchOption.AllDirectories

而不是

FileIO.SearchOption.searchAll子目录

快乐编码
 使用

问题1
当前缺少一个参数

因为：

重要提示：

请将
选项Strict放在
上，作为代码模块的第一行。这将帮助您避免这些错误。理想情况下，在项目选项中将
选项设置为Strict On
，以便将其应用于所有文件。如果没有

上明确的

选项和

上严格的

选项，切勿在大型项目上工作。（我还建议
选项推断关闭
）

问题2
与GetFiles（）一起使用的正确常量为

System.IO.SearchOption.AllDirectories

而不是

FileIO.SearchOption.searchAll子目录

快乐编码
 使用

问题1
当前缺少一个参数

因为：

重要提示：

请将
选项Strict放在
上，作为代码模块的第一行。这将帮助您避免这些错误。理想情况下，在项目选项中将
选项设置为Strict On
，以便将其应用于所有文件。如果没有

上明确的

选项和

上严格的

选项，切勿在大型项目上工作。（我还建议
选项推断关闭
）

问题2
与GetFiles（）一起使用的正确常量为

System.IO.SearchOption.AllDirectories

而不是

FileIO.SearchOption.searchAll子目录

快乐编码
 您没有指定：sourcedir在哪里-但是如果它是根目录，您将很快通过SearchOption.AllDirectories进入特殊文件夹（我的文档、我的音乐等）

如果是这种情况，您应该看到一个“unauthorizedAccessException”（主要是因为这些目录实际上并不存在），您需要捕获它才能继续处理其他“非特殊”文件夹。然后，您可以重新访问这些文件夹（例如MyDocuments），如下所示：

（将返回如下内容：c:\users\cptnvic\documents）

然后，类似于：

For Each foundFile As String In My.Computer.FileSystem.GetDirectories(myPath, FileIO.SearchOption.SearchTopLevelOnly, "*.*")

将返回要递归的文件夹列表。您只需要将这些文件夹附加到myPath。此方法不需要任何管理更改（对于当前用户）

祝你好运
 您没有指定：sourcedir在哪里-但是如果它是根目录，您将很快通过SearchOption.AllDirectories进入特殊文件夹（我的文档、我的音乐等）

如果是这种情况，您应该看到一个“unauthorizedAccessException”（主要是因为这些目录实际上并不存在），您需要捕获它才能继续处理其他“非特殊”文件夹。然后，您可以重新访问这些文件夹（例如MyDocuments），如下所示：

（将返回如下内容：c:\users\cptnvic\documents）

然后，类似于：

For Each foundFile As String In My.Computer.FileSystem.GetDirectories(myPath, FileIO.SearchOption.SearchTopLevelOnly, "*.*")

将返回要递归的文件夹列表。您只需要将这些文件夹附加到myPath。此方法不需要任何管理更改（对于当前用户）

祝你好运
 您没有指定：sourcedir在哪里-但是如果它是根目录，您将很快通过SearchOption.AllDirectories进入特殊文件夹（我的文档、我的音乐等）

如果是这种情况，您应该看到一个“unauthorizedAccessException”（主要是因为这些目录实际上并不存在），您需要捕获它才能继续处理其他“非特殊”文件夹。然后，您可以重新访问这些文件夹（例如MyDocuments），如下所示：

（将返回如下内容：c:\users\cptnvic\documents）

然后，类似于：

For Each foundFile As String In My.Computer.FileSystem.GetDirectories(myPath, FileIO.SearchOption.SearchTopLevelOnly, "*.*")

将返回要递归的文件夹列表。您只需要将这些文件夹附加到myPath。此方法不需要任何管理更改（对于当前用户）

祝你好运
 您没有指定：sourcedir在哪里-但如果它是根目录，您将很快崩溃到特殊文件夹中（my docum）
For Each foundFile As String In My.Computer.FileSystem.GetDirectories(myPath, FileIO.SearchOption.SearchTopLevelOnly, "*.*")