Regexp problem <strong> balise

[ATR]

Hello,

I have a small regexp problem...

Many hours that I search solution, but I don't find

I have a string 

localisationBlock....many text......<p><strong>Agence CFI Mâcon</strong><br>6&nbsp;grande rue de la Coupée<br>71850&nbsp;Charnay lès Mâcon</p>

and <strong> and </strong> are not always present

I have my regexp : '(?s)localisationBlock.*?(?:<p><strong>|<p>)(.*?(?:</strong>)?)</p>.*?/div'

Thanks in advance

[Xenobiologist]

Maybe it would be easier to adress the containing elemt in your webpage by name or id and then just read the innerhtml instead of the text with all the tags.

[ATR]

In fact I already use _IETagNameGetCollection() function. 

$Donnees = _IETagNameGetCollection($IE, "li")
For $Donnee In $Donnees
If StringInStr($Donnee.classname, "visitCard withVisual sc") Then
$Adresse = StringRegExp($Donnee.outerhtml, '(?s)localisationBlock.*?(?:<p><strong>|<p>)(.*?(?:</strong>)?)</p>.*?/div', 1)
If @error = 0 Then
consolewrite($Adresse[0] & @crlf)
EndIf
EndIf
Next

Edited June 25, 2013 by ATR

[FireFox]

Hi,

You are not explaining what you want to get with your regular expression...

Edit: Please provide an example of the desired output in all cases. (with or without the strong tags as you said)

Br, FireFox.

Edited June 25, 2013 by FireFox

[ATR]

        <div class="localisationBlock">

            <p><strong>Agence CFI Mâcon</strong><br>6&nbsp;grande rue de la Coupée<br>71850&nbsp;Charnay lès Mâcon</p>

            <ul>

            </div>

 

 

And I want :

 

Agence CFI Mâcon

6 grande rue de la Coupée

71850 Charnay lès Mâcon

 

Best regards

[FireFox]

#include <Array.au3>
 
$s = FileRead("t.txt")
 
$a = StringRegExp($s, "(?m)>(.*?)<", 3)
 
_ArrayDisplay($a)

[mikell]

$txt = '  <div class="localisationBlock">' &@crlf& _
 '           <p><strong>Agence CFI Mâcon</strong><br>6&nbsp;grande rue de la Coupée<br>71850&nbsp;Charnay lès Mâcon</p>'  &@crlf& _
           ' <ul>' &@crlf& _
          '  </div>'

msgbox(0,"", $txt)
$txt = StringRegExpReplace($txt, '(?s)(<.*?>)+', @crlf)
$txt = StringStripWS(StringReplace($txt, '&nbsp;', " "), 3)
msgbox(0,"", $txt)