Tìm string nằm giữa 2 string

Func _GetStr($str, $start = "", $end = "")
    Local $LenStart = StringLen($start)
    If $start = "" Then
        Local $Pstart = 1
    Else
        Local $a = StringInStr($str, $start)
        If $a == 0 Then Return -1
        Local $Pstart = $a + $LenStart
    EndIf
    If $end = "" Then
        Local $Pend = StringLen($str) + 1
    Else
        Local $Pend = StringInStr($str, $end, 0, 1, $Pstart)
        If $Pend == 0 Then Return -2
    EndIf
    Return StringMid($str, $Pstart, $Pend - $Pstart)
EndFunc   ;==>_GetStr