Mega Code Archive

 

Categories / VB.Net / File Directory

 

Returns file names that match a search pattern in a specified path

Imports System.IO Imports System.Linq Module Module1     Sub Main()       Try       Dim files = From file In Directory.EnumerateFiles("\\library\", "*.txt")         Where file.ToLower().Contains("europe")       For Each file In files         Console.WriteLine("{0}", file)       Next       Console.WriteLine("{0} files found.",files.Count.ToString())     Catch PathEx As PathTooLongException       Console.WriteLine(PathEx.Message)         End Try     End Sub End Module