function OptimizeHtml(sPageSource) 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
| • | sPageSource ... 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"
|
|