Between function ?

[Andre 0]

Hi does someone already developed an between function ?

I need it badly

For example : Between("this is my very long text string","my","long")

should return " very ")

Thnx.

[ezzetabi 2]

Func _Between($input,$before,$after)
  Local $where_before, $where_after
  $where_before = StringInStr($input,$before)
  $where_after = StringInStr($input,$after)
  If $where_after <> 0 AND $where_before <> 0 Then
    Return StringMid($input,$where_before + 1 + StringLen($Where_before), _
    Where_after - 1 - $Where_before - StringLen($Where_before))
  Else
    Return 0
  EndIf
EndFunc

Try that!

Edited June 16, 2004 by ezzetabi

[Andre 0]

my humble thnx it works

[ezzetabi 2]

I hope that you understand what I did and that will help you with yours next scripts.

I apreciate your gratitude.

/me bows

[ezzetabi 2]

Mine is smaller.

[ezzetabi 2]

Func _Between($input,$before,$after)
 Local $where_before, $where_after
 $where_before = StringInStr($input,$before)
 $where_after = StringInStr($input,$after)
 If $where_after <> 0 AND $where_before <> 0 Then
    If $where_before => $where_after Then
       SetError ( -1 )
       Return 0
    EndIf
    Return StringMid($input,$where_before + 1 + StringLen($Where_before), _
    Where_after - 1 - $Where_before - StringLen($Where_before))
 Else
    SetError ( 1 ) 
    Return 0
 EndIf
EndFunc

Solved... Still it was not intended as a challenge, I was just joking.

Edited June 17, 2004 by ezzetabi

[emmanuel 0]

I have that all impotent ERROR handling.

*snicker*

sorry. now that that's out of my system... error handling rocks.