Wenn Sonderzeichen, die z.B. aus einem Silverlight-Control kommen, noch numerische HTML Entities haben, also sowas wie “ü”, kann man das mit folgender Funktion in echte ANSI Zeichen konvertieren:
Public Shared Function CleanNumericEntities(ByVal InText As String) As String
Return Regex.Replace(InText, "&#\d{3};", New MatchEvaluator(AddressOf ReplaceNumericHTML))
End Function
Private Shared Function ReplaceNumericHTML(ByVal Ma As Match) As String
Dim Val = Ma.Value.Substring(2, 3)
If IsNumeric(Val) Then Return Chr(Val)
Return "?"
End Function
6623a3df-4675-4bf0-9a83-bd457381146c|0|.0