How to run findstr Command in vb.net?

Dim Findstring = IO.File.ReadAllText("Your File Path")
Dim Lookfor as string = "hello"
 
If FindString.Contains(Lookfor) then
'Do something
Msgbox("Found: " & Lookfor)
end if

Select allOpen in new window

Imports System.IO

Module Module1

    Sub Main()
        ' Store the line in this String.
        Dim search As String
        Dim infile As String
        'Dim outfile As String

        infile = "z:\test\names.csv"
        search = "Joe"
        ' Create new StreamReader instance with Using block.
        TextFileExample(infile, search)
        

        ' Write the line we read from "file.txt"
        Console.WriteLine(vbCrLf + "press enter to end")
        Console.ReadLine()

    End Sub

    Public Sub TextFileExample(ByVal filePath As String, searchtext As String)

        ' Verify that the file exists. 
        If System.IO.File.Exists(filePath) = False Then
            Console.Write("File Not Found: " & filePath)
        Else
            Dim Findstring() As String = File.ReadAllLines(filePath)
            Dim s As String
            For Each s In Findstring
                If s.Contains(searchtext) Then
                    Console.WriteLine(s)
                End If
            Next

        End If
    End Sub
    End Module

Select allOpen in new window

Hi,

I need to search a text within a text file which as 32 columns and more than 12 million rows. The best option I believe to do is using the "Findstr" command prompt.  But I need to create a GUI to use this command.  Please help me to run this command in VB.NET/

Thanks
Joe

Check the "Controlling process input/output." section at following

http://www.thescarms.com/dotnet/Process.aspx


Also

http://www.codeproject.com/Articles/170017/Solving-Problems-of-Monitoring-Standard-Output-and

Hi,

I followed the above link and I still have problem.  Following is my code.  

 Dim myProcess As Process = New Process()
        Dim s As String = "ABC78611"
        Dim outfile As String = "C:\A\Joetext.txt"

        Dim SearchFile As String = "C:\A\joe.txt"

        myProcess.StartInfo.FileName = "cmd.exe"

        myProcess.StartInfo.Arguments = "/findstr /i " & SearchFile & "> " & outfile

        myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
        myProcess.StartInfo.CreateNoWindow = True
        myProcess.Start()
     
        myProcess.WaitForExit(1000)
        If Not myProcess.HasExited Then
            myProcess.Kill()
        End If
     
        'MessageBox.Show("The command window was " & _
        '    "closed at: " & myProcess.ExitTime & "." & System.Environment.NewLine & _
        '    "Exit Code: " & myProcess.ExitCode)

        myProcess.Close()

What is the problem? You are not redirecting the output from the console to your program.

You must use /c switch to execute command via cmd:
proc.Arguments = ("/c findstr /i """ & strItem & """C:\A\JOETEXT.txt > C:\A\JOE.txt")

Hi Ark,
It creates a blank JOE.txt without any searched result.  It seems like the Findstr is still not working.

Joe

Great.  Thanks for your help. It works as I wanted....:)