
Code
Imports System.IO
Public Class RecursiveFileFinder
Public Shared Function GetAllFiles(ByVal path As String, ByVal searchPattern As String) As FileInfo()
If Directory.Exists(path) Then
Dim directory As New DirectoryInfo(path)
Return directory.GetFiles(searchPattern, SearchOption.AllDirectories)
Else
Return Nothing
End If
End Function
End Class
posted @
2009-10-15 05:01 N/A2011 阅读(47) 评论()
编辑 收藏