[R] Recherche deux chaînes de caractères dans une ligne

[ric025]

Bonjour.

Je voudrais que mon script prenne en compte deux chaînes de caractères distantes dans une même ligne d'un fichier texte.

Mon script fonctionne avec la fonction : StringInStr si je mets toute la ligne. Mais cette ligne contient des caractères aléatoires. Je veux donc prendre en compte seulement quelques mots.

Par exemple, j'ai ceci :

Code : Tout sélectionner

While 1
$line = FileReadLine($file)
if @error = -1 Then ExitLoop

If StringInStr($line, "Version de Firefox (Mozilla) : 3.9 (fr) /!\ non à jour !",1) Then
  InetGet("http://download.mozilla.org/?product.....etc", @DesktopDir&"\Firefox.exe")
WEnd
Exit

Donc, comme ça, aucun soucis. Si, dans mon rapport, j'ai cette ligne, le téléchargement se lance correctement. Seulement, cette partie : 3.9 (fr) est aléatoire, évidemment ... Et je n'arrive pas à faire pour prendre en compte le début et la fin de la ligne, sans cette petite partie

Merci pour l'aide apportée.
++

[matwachich]

Code : Tout sélectionner

If StringInStr($line, 'Version de Firefox (Mozilla)') And StringInStr($line, 'non à jour') Then ...

[ric025]

Hi

Effectivement, ça a l'air de fonctionner ... J'avais oublié de retaper "StringInStr" après le "AND" ...

J'ai eu peur que comme ça, il prenne en compte le "/!\ non à jour !" dans tout le rapport, mais non !!

Je te remercie !

[ric025]

Re.

En fait, c'est ce que je craignais ... cela ne fonctionne pas ... Il y a plusieurs lignes à vérifier, par cette méthode, rien, le programme se ferme ...

[Tlem]

Je ne suis pas sur de l’efficacité de mon pattern, mais voici une autre solution :

Code : Tout sélectionner

$String = "Version de Firefox (Mozilla) : 3.9 (fr) /!\ non à jour !"
$Pattern = "(Version de Firefox \(Mozilla\) : ).*( /!\\ non à jour !)"

MsgBox(0, '', StringRegExp($String, $Pattern))

; Sans (Mozilla)
$String = "Version de Firefox : 3.9 (fr) /!\ non à jour !"
MsgBox(0, '', StringRegExp($String, $Pattern))

; Avec erreur dans Firefox
$String = "Version de Firfox (Mozilla) : 3.9 (fr) /!\ non à jour !"
MsgBox(0, '', StringRegExp($String, $Pattern))