我对那个密码有意见。它获取包括子文件夹在内的文件夹中所有文件的文件路径。但是当它出现在子文件夹时,文件路径仍然是这样生成的:“我找到文件的文件夹的路径”+ "\“+”查找文件的名称“,所以当它是子文件夹时,路径是不正确的,因为它不包括子文件夹名。我希望你明白我的意思。
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发布于 2014-11-26 21:59:08
如果您所需要的只是这些文件,请尝试如下:
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
Stophttps://stackoverflow.com/questions/27156492
复制相似问题