Find String in txt file

[antmar904]

Hi,

I am trying to find the string "Cert1" in a txt file and if found display a message and if not found display a message but i'm stuck.

Local $CertLog = @ScriptDir & "\CompCertChk.txt"
Local $hFileOpen = FileOpen($CertLog, 0)
Local $Content = FileRead($hFileOpen)
FileClose($hFileOpen)
Local $aString = StringRegExp($Content, "Cert1", 0, "")
If @error = "1" Then
    MsgBox("", "", "Cert is installed")
    Exit
Else
    If @error = "0" Then
        MsgBox("", "", "Cert is NOT installed")
        Exit (63)
    EndIf
EndIf

 

[jguinch]

Why don't you use StringInStr ?

 

If StringInStr($content, "Cert1") Then
    MsgBox("", "", "String found")
Else
    MsgBox("", "", "String not found")
EndIf

[antmar904]

Yes that worked, thanks.  I figured I was over complicating things  

[antmar904]

How would I properly use the @error being returned? 

[jguinch]

Local $aString = StringRegExp($Content, "Cert1")
If @error Then
    MsgBox("", "", "String NOT found")
Else
    MsgBox("", "", "String found")
EndIf