Umlaute in Msgbox

  • Hallo,

    wie kann ich den ausgelesenen Text auf UTF8 konvertieren, bevor ich ihn in der Msgbox ausgebe?

    Spoiler anzeigen
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Res_Fileversion=1
    #AutoIt3Wrapper_Run_Tidy=y
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <_HTML.au3>
    #include <String.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Local $sHTML = _HTML_GetSource("http://www.zks-abfall.de/DE/Home/homepage__node.html?__nnn=true")
    Sleep(1000)
    Local $Meldung = _StringBetween($sHTML, '<p class="MsoNormal">', '</p>'); Störmeldung auslesen
    ConsoleWrite("Meldung: " & $Meldung[0] & @CRLF)
    MsgBox(64, "ZKS Meldung:", $Meldung[0])

    [/autoit]
  • _HTML.au3 ist bei mir INet.au3

    z.b.:

    [autoit]


    #include <inet.au3>
    #include <String.au3>

    [/autoit][autoit][/autoit][autoit]

    Local $sHTML = _INetGetSource("http://www.zks-abfall.de/DE/Home/homepage__node.html?__nnn=true")

    [/autoit][autoit][/autoit][autoit]

    Sleep(1000)

    [/autoit][autoit][/autoit][autoit]

    Local $Meldung = _StringBetween($sHTML, '<p class="MsoNormal">', '</p>'); Störmeldung auslesen

    [/autoit][autoit][/autoit][autoit]

    for $i = 0 to UBound($Meldung)-1
    $Meldung[$i] = StringReplace($Meldung[$i], "ä", "ä")
    $Meldung[$i] = StringReplace($Meldung[$i], "ö", "ö")
    Next

    [/autoit][autoit][/autoit][autoit]

    ConsoleWrite("Meldung: " & $Meldung[0] & @CRLF)

    [/autoit][autoit][/autoit][autoit]

    MsgBox(64, "ZKS Meldung:", $Meldung[0])

    [/autoit][autoit][/autoit][autoit][/autoit]

    Simon nörgelt, Simon nervt - aber Simon verbessert die Welt. Glaubt er.

  • [autoit]

    #include <Inet.au3>
    #include <String.au3>

    [/autoit][autoit][/autoit][autoit]

    Local $sHTML = _INetGetSource("http://www.zks-abfall.de/DE/Home/homepage__node.html?__nnn=true")
    Sleep(1000)
    Local $Meldung = _StringBetween($sHTML, '<p class="MsoNormal">', '</p>'); Störmeldung auslesen

    [/autoit][autoit][/autoit][autoit]

    $Meldung[0] = BinaryToString($Meldung[0], 4);UTF8

    [/autoit][autoit][/autoit][autoit]

    ConsoleWrite("Meldung: " & $Meldung[0] & @CRLF)
    MsgBox(64, "ZKS Meldung:", $Meldung[0])

    [/autoit]


    UTF8 in der AutoIt-Hilfe eingegeben findet eine Handvoll Treffer....

  • Andy:

    [autoit]

    $Meldung[0] = BinaryToString($Meldung[0], 4);UTF8

    [/autoit]

    Hättest du mir das nicht schon vor 3 Jahren mitteilen können? :D

    Simon nörgelt, Simon nervt - aber Simon verbessert die Welt. Glaubt er.