Mega Code Archive

 
Categories / VB.Net / File Directory
 

Use Linq to search and read files

Imports System.IO Imports System.Xml.Linq Module Module1     Sub Main()             Dim files = From chkFile In Directory.EnumerateFiles("c:\", "*.txt", _                                                  SearchOption.AllDirectories)                         From line In File.ReadLines(chkFile)                         Where line.Contains("is")                         Select New With {.curFile = chkFile, .curLine = line}             For Each f In files                 Console.WriteLine("{0}\t{1}", f.curFile, f.curLine)             Next       Console.WriteLine("{0} files found.",files.Count.ToString())     End Sub End Module