Login | Register   
RSS Feed
Download our iPhone app
Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: VB7
Expertise: Intermediate
Apr 21, 2003

SearchFileInDirTree - Searches a file on a directory tree

<System.Runtime.InteropServices.DllImport("imagehlp.dll")> Shared Function _
    SearchTreeForFile(ByVal rootPath As String, ByVal inputPathName As String, _
    ByVal outputPathBuffer As System.Text.StringBuilder) As Boolean
End Function

' Returns the complete path+name of the filename or a null string if the
' filename hasn't been found. Only the first occurrence of the file is returned.
' Example: Debug.WriteLine(SearchFileInDirTree("d:\codearchitects\codebox",
'  "codebox.exe"))

Function SearchFileInDirTree(ByVal rootDir As String, ByVal fileName As String) _
    As String
    Dim buffer As New System.Text.StringBuilder(260)
    SearchTreeForFile(rootDir, fileName, buffer)
    Return buffer.ToString()
End Function
Marco Bellinaso
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.