Jump to content

Recommended Posts

Posted

Hi guys

I hope you can help me out with this one.

I have a text file "test.txt" which could contain something like this:

__________________________________________________________

fiw
eqw
sdg
xcv

__________________________________________________________

Each string has it's own line.

 

I use this script to find a string in the text file.

In this example, the string I am looking for is "iw".
The string "fiw" makes it believe that "iw" is found in the file. How can I avoid this?
I want it only to return EXACT results.
 

$string = "iw"

$File = FileOpen("test.txt", 0)
$ReadFile = FileRead($File)
FileClose($File)

If StringRegExp(StringLower($ReadFile), StringLower($string)) Then

MsgBox(0,"",$string & " is found in the file")

Exit

Else

MsgBox(0,"",$string & " is not found in the file")

Exit

EndIf

 

  • Moderators
Posted

david1337,

Use "beginning and end of string" anchors around the required string like this:

$string = "iw"

$ReadFile = "fiw" & @CRLF & "eqw" & @CRLF & "sdg" & @CRLF & "xcv"

If StringRegExp(StringLower($ReadFile), "^" & StringLower($string) & "$") Then
    MsgBox(0, "", $string & " is found in the file")
Else
    MsgBox(0, "", $string & " is not found in the file")
EndIf

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

  Reveal hidden contents

 

Posted

Hi Melba

Thanks for your answer!
It seems that with your code, all strings gets the message "is not found in the file", even though I use "fiw" which is there?

 

  • Moderators
Posted

david1337,

mikell had the answer - you need to be in multiline mode:

$ReadFile = "fiw" & @CRLF & "eqw" & @CRLF & "sdg" & @CRLF & "xcv"

$string = "iw"
If StringRegExp(StringLower($ReadFile), "(?m)^" & StringLower($string) & "$") Then
    MsgBox(0, "", $string & " is found in the file")
Else
    MsgBox(0, "", $string & " is not found in the file")
EndIf

$string = "fiw"
If StringRegExp(StringLower($ReadFile), "(?m)^" & StringLower($string) & "$") Then
    MsgBox(0, "", $string & " is found in the file")
Else
    MsgBox(0, "", $string & " is not found in the file")
EndIf

Sorry about that - I had tested for the "wrong" case, but not for "right" one.

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

  Reveal hidden contents

 

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...