La fonction:
Func _StringBetween2String($String,$StringDebut,$StringFin,$caseSense=False)
If ((IsString($String) And IsString($StringDebut) And IsString($StringFin)) And IsBool($caseSense)) Then
Local $case=0
If $caseSense Then
$case=1
EndIf
If $StringDebut = "" Then
Local $fin=StringInStr($String,$StringFin,$case,1)
Return StringMid ($String,1,$fin-1)
ElseIf $StringFin = "" Then
Local $debut=StringInStr($String,$StringDebut,$case)
Return StringMid ($String,$debut+StringLen($StringDebut))
Else
Local $debut=StringInStr($String,$StringDebut,$case)
If @error = 0 Then
Local $fin=StringInStr($String,$StringFin,$case,1,$debut)
If $fin <> $debut Then
Local $realDebut=$debut+StringLen($StringDebut)
Return StringMid($String,$realDebut,$fin-$realDebut)
EndIf
EndIf
EndIf
Else
SetError(1);erreur parametre
EndIf
Return ""
EndFunc
Que fait cette fonction? Quels sont les paramètre ?
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.6.0
Auteur: Pandi_Panda
Fonction du Script :
#_StringBetween2String($String,$StringDebut,$StringFin,$caseSense=False)
@FONCTION:
> permet d'extirper un String entre 2 string, servant de delimiteur.
@PARAM
> $String ; est le string Principal, contenant tout.
> $StringDebut ; est le 1er string delimiteur. [si $StringDebut="" alors on extirpe du debut jusque $StringFin]
> $StringFin ; est le second string delimiteur.[si $StringFin="" alors, on extirpe depuis le $StringDebut jusque la fin]
> $caseSense ; si on veux avec case Sensitive ou pas. [true si oui; false si non]
@RETURN
> return le string se situant entre les 2 String delimiteur. [si erreur retourne "" [rien]]
@ERROR
> @ERROR=1 si erreur de parametre.
#ce ----------------------------------------------------------------------------
Exemple d'utilisation:
$String="<lol>Test Du Panda :D "&@CRLF&"#Pandaaaaaaaa#</LOL>"&"</lol>"
$StringDebut="<lol>"
$StringFin="</lol>"
MsgBox(0,"",_StringBetween2String($String,$StringDebut,$StringFin))
$StringFin=""
MsgBox(0,"",_StringBetween2String($String,$StringDebut,$StringFin))
$StringDebut=""
$StringFin="</lol>"
MsgBox(0,"",_StringBetween2String($String,$StringDebut,$StringFin,True))
$StringFin="</LOL>"
MsgBox(0,"",_StringBetween2String($String,$StringDebut,$StringFin,True))