Encoding

  • VB.NET
  • .NET (FX) 4.0

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von reustli.

    Encoding

    Hallo Zusammen
    Das leidige Thema mit der Codierung ... bereitet mir wieder einmal Kopfzerbrechen.
    Ich übergebe eine URL und bekomme als Resultat ein XML zurück das ich in eine Listbox auslese, funktioniert alles bis auf die Formatierung bei den Umlauten.
    Habt ihr eine Idee wie ich das lösen kann?


    Hier mein Code:

    Quellcode

    1. Public Structure Openth
    2. Public wort As String
    3. End Structure


    Quellcode

    1. Private Sub DownloadXML()
    2. Try
    4. Dim webClient As Net.WebClient = New Net.WebClient()
    5. AddHandler webClient.DownloadStringCompleted, AddressOf webClient_DownloadStringCompleted
    6. webClient.DownloadStringAsync(New Uri("http://www.openthesaurus.de/synonyme/search?q=" & TextBox1.Text & "&format=text/xml"))
    8. Catch ex As Exception
    9. MessageBox.Show("Fehler.")
    10. End Try
    11. End Sub


    Quellcode

    1. Private Sub webClient_DownloadStringCompleted(sender As Object, e As DownloadStringCompletedEventArgs)
    2. ListBox1.Items.Clear()
    4. Try
    6. Dim xelement As XElement = xelement.Parse(e.Result, LoadOptions.None)
    8. Dim xECBs = From ECB In xelement.Descendants("term") _
    9. Where ECB.Attribute("term") IsNot Nothing _
    10. Select New Openth With { _
    11. .wort = ECB.Attribute("term").Value}
    13. For Each Line In xECBs
    14. ListBox1.Items.Add(Line.wort)
    15. Next
    17. Catch ex As Exception
    18. MessageBox.Show("Fehler.")
    19. End Try
    21. End Sub

    Dann wird wohl im eingelesenen XML das Encoding nicht korrekt angegeben. Da hilft dann meist nur raten. Evtl. kannst du mit den Klassen aus System.Text.Encoding was anfangen.
    Weltherrschaft erlangen: 1%
    Ist dein Problem erledigt? -> Dann markiere das Thema bitte entsprechend.
    Waren Beiträge dieser Diskussion dabei hilfreich? -> Dann klick dort jeweils auf den Hilfreich-Button.
    Danke.

    reustli schrieb:

    "&format=text/xml"))
    Gibt es da noch Formatierungsoptionen (z.B. UTF8 oder so)?
    Wenn ich mir diese Datei mit dem FF loade, sieht sie vernünftig aus.
    Allerdings schmeißt der Virenscanner das Programm raus.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Habs gefunden ...
    Hier die Encoding Eigenschaft (zweite Zeile) löst das Problem ...

    Quellcode

    1. Dim webClient As Net.WebClient = New Net.WebClient()
    2. webClient.Encoding = System.Text.Encoding.UTF8
    3. AddHandler webClient.DownloadStringCompleted, AddressOf webClient_DownloadStringCompleted
    4. webClient.DownloadStringAsync(New Uri("http://www.openthesaurus.de/synonyme/search?q=" & TextBox1.Text & "&format=text/xml"))


    Gruss

Facebook
Telefonspende