Kleine Funktion um die fehlerhaften zeichen zu ersetzen:
VB.NET-Quellcode
- 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
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „der_Kurt“ () aus folgendem Grund: animierten Pfeil entfernt