Finding a text between 2 markers

[Dryden]

Hi,

So I'm trying to find a given text in a .txt file that has 200 to 500 lines and the text that I want is allways between # 010 # and # 101 #

For example:

Lorem ipsum dolor sit amet, consectetur adipisicing elit,

sed do eiusmod tempor incididunt ut labore et dolore

magna aliqua. Ut enim ad minim veniam, quis nostrud

exercitation ullamco laboris nisi ut aliquip ex ea commodo

# 010 #consequat. Duis aute irure dolor in reprehenderit

in voluptate velit esse cillum dolore eu fugiat nulla# 101 #

pariatur. Excepteur sint occaecat cupidatat non proident,

sunt in culpa qui officia deserunt mollit anim id est laborum

What I want is to put the text in bold in a variable.

Any help woul be appreciated.

thx in advance

Edited August 12, 2012 by Dryden

[Thamiel]

I couldn't find the post that I first found the following snippet wrote by someone else and I take no credit for it, but it works great for what your after

To use it $str = "# 010 #Your String of course# 101 #", $start = '# 010 #', $end = '# 101 #'

; A Modified String < Between > Search ------------------------------------------------------
Global $pos
Func stringbetween($str, $start, $end)
$pos = StringInStr($str, $start)
If Not @error Then
$str = StringTrimLeft($str, $pos + StringLen($start) - 1)
$pos = StringInStr($str, $end)
If Not @error Then
$str = StringTrimRight($str, StringLen($str) - $pos + 1)
Return $str
EndIf
EndIf
EndFunc ;==>stringbetween

Edited August 12, 2012 by Thamiel

[Deltron0]

$source = "magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo# 010 #consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla# 101 # pariatur. Excepteur sint occaecat cupidatat non proident,"


$StartMarkerText = "# 010 #"
$EndMarkerText = "# 101 #"

$start = StringInStr($source,$StartMarkerText) + StringLen($StartMarkerText)
$end = StringInStr($source,$EndMarkerText)
$length = $end - $start

$newvalue = StringMid($source,$start,$length)

ConsoleWrite($newvalue)

Edit: I posted this before seeing the post above - that function is probably a better route, especially if you need to do that task with a lot of different starting and ending markers.

Edited August 12, 2012 by Deltron0

[UEZ]

Try this:

$sText = _
"Lorem ipsum dolor sit amet, consectetur adipisicing elit," & @CRLF & _
"sed do eiusmod tempor incididunt ut labore et dolore" & @CRLF & _
"magna aliqua. Ut enim ad minim veniam, quis nostrud" & @CRLF & _
"exercitation ullamco laboris nisi ut aliquip ex ea commodo" & @CRLF & _
"# 010 #consequat. Duis aute irure dolor in reprehenderit" & @CRLF & _
"in voluptate velit esse cillum dolore eu fugiat nulla# 101 #" & @CRLF & _
"pariatur. Excepteur sint occaecat cupidatat non proident," & @CRLF & _
"sunt in culpa qui officia deserunt mollit anim id est laborum"

$sCaptured = StringRegExpReplace($sText, "(?s)(.*#s*d+s*#)(.*)(#s*d+s*#.*)", "$2")
MsgBox(0, "Test", $sCaptured)

Br,

UEZ

[Melba23]

Dryden,

And another:

$sSource = "magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip " & _
           "ex ea commodo# 010 #consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse " & _
           "cillum dolore eu fugiat nulla# 101 # pariatur. Excepteur sint occaecat cupidatat non proident,"

$sExtract = StringRegExpReplace($sSource, ".*010s#(.*)#s101.*", "$1")

ConsoleWrite($sExtract & @CRLF)

M23

Edited August 12, 2012 by Melba23
Forum stripped backslashes

[Dryden]

Gr8. Thx guys!

[somdcomputerguy]

And last (for now) and probably not least - the _StringBetween function!