Reguläre Ausdruck. Komme nicht weiter

Rici64

Hi,
könnt Ihr mir bitte helfen?
Komme einfach nicht weiter.

Wie schaffe ich es die Adressen in ein Array zu bekommen?

class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href="

Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="&#10
</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="

</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="


es soll mir immer die Adresse herausfiltern.

So weit bin ich gekommen...... Bin total überfordert..

$regexp = StringRegExp($Dateiinhalt_aponet, '"adress">', 3)

Vielen Dank

Rici

Zeitriss

Hi

Versuch es mal so:

AutoIt

$sString = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href="
' & @crlf & _
'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="
' & @crlf & _
'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="
' & @crlf & _
'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="
'
$aArray = StringRegExp($sString,'class="adress">(.*?)<br\/>(.*?)<br/>',3)
For $i = 0 to UBound($aArray) -2 step + 2
   MsgBox(0,"",$aArray[$i] & @crlf & $aArray[$i +1])
Next

Alles anzeigen

mfg

Zeitriss

**AspirinJunkie**

Alternativ könnte man auch erst die <br>s in Zeilenumbrüche wandeln damit danach die Behandlung etwas einfacher wird:

AutoIt

$sString = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href=" ' & @CRLF & _
		'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="' & @CRLF & _
		'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="' & @CRLF & _
		'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="'




$aArray = StringRegExp(StringRegExpReplace($sString, "<br/?>", @CRLF), '(?s)class="adress">(.+?)<', 3)
For $adress In $aArray
	MsgBox(0, "", $adress)
Next

Alles anzeigen

Rici64

Vielen Dank.

Ist echt der Hammer wie ihr das drauf habt.....

Ich versuche mal nachzuvollziehen wie Ihr das gemacht habt.

Habt Ihr da ein spezielles Programm?

Liebe Grüße

Rici

Rici64

Zitat von AspirinJunkie

Alternativ könnte man auch erst die <br>s in Zeilenumbrüche wandeln damit danach die Behandlung etwas einfacher wird:

Wie mach ich das nun zwischen der Hausnummer und der Postleitzahl ein / steht?? Ich blicke das nicht.. Im Array meine ich.

#include <Array.au3>

$sString = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href=" ' & @CRLF & _
'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="' & @CRLF & _
'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="' & @CRLF & _
'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="'
$aArray = StringRegExp(StringRegExpReplace($sString, "<br/?>", @CRLF), '(?s)class="adress">(.+?)<', 3)

_ArrayDisplay($aArray)

**Kanashius**

AutoIt

#include <Array.au3>


$sString = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href=" ' & @CRLF & _
'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="' & @CRLF & _
'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="' & @CRLF & _
'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="'


$aArray = StringRegExp(StringRegExpReplace($sString, "<br/?>", " / "), '(?s)class="adress">(.+?)<', 3)
for $i=0 to UBound($aArray)-1 step 1
	$aArray[$i]=StringLeft($aArray[$i],StringLen($aArray[$i])-3)
next
_ArrayDisplay($aArray)

Alles anzeigen

Einfach statt @crlf nen " / " dort rein und aus dem array die letzten 3 zeichen entfernen (da dort ja auch ein br war).

Rici64

habs kappiert. Vielen Dank

**Andy**

Zitat von Rici64

Habt Ihr da ein spezielles Programm?

ja, bei komplizierteren RegEx benutze ich das gerne -> https://regex101.com
Die Erklärungen helfen weiter und auch das Registerzur Anzeige der Tokens ist hilfreich...ich bin schließlich schon alt, da muss man nicht mehr alles im Kopf haben..
"Wissen ist wissen, wo es steht!"

Rici64

Zitat von AspirinJunkie

Alternativ könnte man auch erst die <br>s in Zeilenumbrüche wandeln damit danach die Behandlung etwas einfacher wird:

AutoIt

$sString = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href=" ' & @CRLF & _
		'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="' & @CRLF & _
		'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="' & @CRLF & _
		'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="'




$aArray = StringRegExp(StringRegExpReplace($sString, "<br/?>", @CRLF), '(?s)class="adress">(.+?)<', 3)
For $adress In $aArray
	MsgBox(0, "", $adress)
Next

Alles anzeigen

Hi,
Ich bin wieder an diesem Problem... Ich schaffe es einfach nicht.
Ich bräuchte nun alles in einem 3d Arrad, aber getrennt in spalten: Also Spalte 1 Anschrift, Spalte 2 plz und Spalte 3 Ortschaft.

Würde mir noch jemand helfen?
Vielen Dank.

**BugFix**

Bitte (ist aber nicht 3D - sondern 2D mit 3 Spalten ) :

AutoIt

$sText = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href=" ' & @CRLF & _
'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="' & @CRLF & _
'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="' & @CRLF & _
'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="'


$sPatt = '(?s)class="adress">([^<]+)<br/>(\d{5})\s([^<]+)'
$aMatch = StringRegExp($sText, $sPatt, 4)


Local $aResult[UBound($aMatch)][3]
For $i = 0 To UBound($aMatch) -1
	$aResult[$i][0] = ($aMatch[$i])[1]
	$aResult[$i][1] = ($aMatch[$i])[2]
	$aResult[$i][2] = ($aMatch[$i])[3]
Next


_ArrayDisplay($aResult)

Alles anzeigen

**autoBert**

Man kann auch die Stringfunktionen dafür verwenden:

AutoIt

#include <Array.au3>
#include <String.au3>


$sString = 'class="adress">Rathausplatz 5<br/>90403 Nürnberg<br/><a href=" ' & @CRLF & _
		'Kontakt</h3><p class="adress">Äußere Bayreuther Str. 121<br/>90409 Nürnberg<br/><a href="' & @CRLF & _
		'</span></p><h3>Kontakt</h3><p class="adress">Wallensteinstraße 28<br/>90439 Nürnberg<br/><a href="' & @CRLF & _
		'</span></p><h3>Kontakt</h3><p class="adress">Glogauer Str. 30 - 38<br/>90473 Nürnberg<br/><a href="'
$aAdress=_StringBetween($sString,'"adress">','<br/><a href="')
;ergibt jede adresszeile also z.B.:   Rathausplatz 5<br/>90403 Nürnberg
_ArrayColInsert($aAdress,1)	;Spalte einfügen
_ArrayColInsert($aAdress,1)	;Spalte einfügen
For $i=0 To UBound($aAdress)-1
	$aSplit=StringSplit($aAdress[$i][0],'<br/>',$STR_ENTIRESPLIT)
	;ergibt Array mit 3 Feldern
	;0 = Anzahl der Einträge
	;1 = Straße HausNr
	;2 = PLZ Ort
	if @error Then ContinueLoop
	If $aSplit[0]<1 Then ContinueLoop
	$aAdress[$i][0]=$aSplit[1]
	;Straße HausNr in 2D Array speichern
	If $aSplit[0]<2 Then ContinueLoop
	$aAdress[$i][1]=StringLeft($aSplit[2],5)
	;PLZ in 2D Array speichern
	$aAdress[$i][2]=StringMid($aSplit[2],7)
	;Ort in 2D Array speichern
Next
_ArrayDisplay($aAdress)

Alles anzeigen

ironischerweise verwendet _StringBetween intern auch StringRegExp man muß sich aber nicht selbst mit Patterns herumschlagen.

Rici64

Vielen Dank,

Ihr seit so krass drauf... Ich schaffe es kaum nachzuvollziehen wie Ihr das macht... Aber es geht....

Liebe Grüße aus Nürnberg