German Zeichen richtig darstellen

[Sinan Tuzcu]

Hallo,

mit dem folgenden Code bekomme ich die Daten vom Server geliefert, soweit alle gut, nur einige Zeichen wie "©®" werden als Raute mit eine Fragezeichen innen dargestellt.

Wie kann ich das realisieren, das auch solche Zeichen wie Copyright und Registred korrekt angezeigt wird?

Sub AStreams_NewData (Buffer() As Byte)
    Dim msg As String
    
    
    msg = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
        
    Dim msg_trennen() As String = Regex.Split("\|",msg)
    
    Select Case msg_trennen(0).Trim

        Case "BAT" 
            CallSub2(Main, "DataRecv",  CreateMap("msg_trennen(1)":msg_trennen(1)))
            
    End Select
    
End Sub

Danke im Voraus
Sinan

 

[DonManfred]

Sind die Daten die da kommen in UTF-8 codiert? Wenn nicht, dann musst Du

msg = BytesToString(Buffer, 0, Buffer.Length, "UTF8")

das entsprechend an die richtige codierung anpassen.

 

[Sinan Tuzcu]

Das was der server sendet, sind auch UTF-8

 

[MarkusR]

Wo kommen denn die Daten Ursprünglich her, waren die evtl. vorher ANSI oder Windows 1252?

 

[Sinan Tuzcu]

die kommen von der Hausautomat.

 

[MarkusR]

also dein Server macht aus dem Hausautomat Text Utf8?

 

[Sinan Tuzcu]

ja

 

[MarkusR]

Dann denke ich das dein Hausautomat nicht UTF-8 schickt und Du das umwandeln must.
Was genau ist deine Server-Anwendung? Selber gemacht in C# oder Java?
Kanst Du vom Hausautomat mal ein Foto zeigen oder ein Produkt Name nennen?

 

[Sinan Tuzcu]

Es ist nur eine Relaisausgangsmodul das über das Ethernet verbunden wird.
https://www.yamutec.de/produkte/ethernet-module/eth-rel32-modul/

 

[MarkusR]

Hmm, gibt keine Anleitung da.
Im VB.Net Beispiel steht was von UTF-16.