Shared Function _ SearchTreeForFile(ByVal rootPath As String, ByVal inputPathName As String, _ ByVal outputPathBuffer As System.Text.StringBuilder) As BooleanEnd 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:codearchitectscodebox",' "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 
Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
