Sub OptimizeHtml($pageSource As String) As String
|
OptimizeHtml optimiert den HTML-Source-Code einer Seite wie folgt:
• | Ersetzt alle tabs und carriage return line feeds mit einem Leerzeichen |
• | Fügt vor "<" und nach ">" Leerzeichen ein |
• | Ersetzt doppelte Leerzeichen durch einfache Leerzeichen |
Diese Funktion kann vor dem Extrahieren von bestimmten Informationen einer Webseite aufgerufen werden. Dadurch wird es in vielen Fällen einfacher, die gewünschte Information aus dem optimierten Sourcecode zu extrahieren.
Parameter
• | $pageSource ... String-Ausdruck. Sourcecode einer Webseite, der optimiert werden soll. |
Beispiel:
Dim $s
$s = "The price is<b> 123,50 </b>EUR"
$s = OptimizeHtml($s)
' returns $s = "The price is <b> 123,50 </b> EUR"
|
|