Search textfile for string then return the next line

[spoolin1]

$file = FileOpen("file.txt", 0)
$read = FileRead($file)
If @error = -1 Then
    MsgBox(0, "Error", "File not read")
    Exit
Else
    ;;;MsgBox(0, "Read", $read)
    If StringRegExp($read, "______Part Status______") Then
        MsgBox(0, "Oops", "Match")
    Else
        MsgBox(0, "Oops", "No match")
    EndIf
EndIf
FileClose($file)

 

I found this code and works great finding a string.  What I would like to do is have it look at the next line after a string and assign it to a variable then go from there.  End goal is to check if there is any text on the next line after string or if its empty.   

 

Edited December 4, 2019 by spoolin1

[Nine]

Instead of using StringRegExp use StringInStr that will give you the position of the string and then calculate how long is the searched string and see what's after that with StringMid.

[Melba23]

spoolin1,

Or read the file into an array (_FileReadToArray) and then search the array - when you find the match you just need to read the next element.

M23

[Malkey]

An example using StringRegExpReplace():-

; ---- Create a test text file ------
Local $sText = "", $sOutFile = "output.txt"
For $i = 1 To 6000
    $sText &= (Mod($i, 100) ? "Line " & StringRight("0000" & $i, 4) : "") & @CRLF ; Every 100th line is blank.
Next
FileWrite($sOutFile, $sText)
;ConsoleWrite($sText & @CRLF)

; -------- Find the next line ----------
Local $sSearch = "Line 2999" ; The next line will be blank.
;Local $sSearch = "line 2995" ; The next line will be non-blank. (Remove leading comment character at start of this line to test)
Local $sNextLine = StringRegExpReplace(FileRead($sOutFile), "(?is)^.*" & $sSearch & "\R([^\v]*).*$", "$1") ; Case insensitive "(?i)"

MsgBox(0, "Next line", 'The next line after the line, "' & $sSearch & ' is ' & ($sNextLine = "" ? "blank." : @CRLF & '"' & $sNextLine & '".'))

If FileExists($sOutFile) Then FileDelete($sOutFile) ; Clean up the created test text file.

 

[mikell]

Be careful with regex which needs precise requirements : is the string a part of the line or the whole line, can several occurences of the string exist in the file, is a line considered as 'empty' even when containing only white spaces, etc