Question

我遇到了该代码的问题。它获取文件夹内所有文件的文件路径，包括子文件夹。但是当它遇到一个子文件夹时，文件路径仍然以这种方式生成：“我找到文件的文件夹的路径”+“\”+“找到的文件的名称”所以当它是一个子文件夹时，路径不正确因为它不包含子文件夹名称。我希望你明白我的意思。

 Dim directoryinfo1 As New IO.DirectoryInfo(FOLDER_PATH)
            Dim fileinfo1 As IO.FileInfo() = di.GetFiles("*.*", IO.SearchOption.AllDirectories)
            Dim fileinfo2 As IO.FileInfo
            For Each fileinfo2  In fileinfo1 
            filepath = di.ToString + "\" + dra.ToString
  Next

Answer 1

如果您只需要文件路径，请尝试以下方法：

   Dim a() As String
    Dim sFolder As String = "C:\Temp"
    If True Then
        a = IO.Directory.GetFiles(sFolder, "*.*", IO.SearchOption.AllDirectories)
    Else
        a = IO.Directory.GetFiles(sFolder, "*.*", IO.SearchOption.TopDirectoryOnly)
    End If
    Stop

如何在包含子文件夹的文件夹中获取文件的文件路径？

1 个答案: