webclient.DownloadString encoding Problem umgehen
Wenn man mit dem WebClient einen String runterlädt, werden oftmals die Umlaute falsch dargestellt.
Kleine Funktion um die fehlerhaften zeichen zu ersetzen:
|
Visual Basic Quellcode
|
1
2
3
4
5
6
7
8
9
10
11
|
Public Function HieroglypheToUmlaut(ByVal Zeichenfolge As String) As String
Zeichenfolge = Replace(Zeichenfolge, "", Nothing)
Zeichenfolge = Replace(Zeichenfolge, "ä", "ä")
Zeichenfolge = Replace(Zeichenfolge, "Ä", "Ä")
Zeichenfolge = Replace(Zeichenfolge, "ö", "ö")
Zeichenfolge = Replace(Zeichenfolge, "Ö", "Ö")
Zeichenfolge = Replace(Zeichenfolge, "ü", "ü")
Zeichenfolge = Replace(Zeichenfolge, "Ü", "Ü")
Dim umgewandelt As String = Replace(Zeichenfolge, "ß", "ß")
Return umgewandelt
End Function
|
Einbindung:
|
Visual Basic Quellcode
|
1
|
Dim DownloadedString As String = HieroglypheToUmlaut(WebClient.DownloadString("http://kp.de/kp.txt"))
|
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von »der_Kurt« (18. Mai 2011, 20:03) aus folgendem Grund: animierten Pfeil entfernt