12551
22.07.2009, aktualisiert um 08:45:57 Uhr
3944
2
0
Falscher Zeichensatz
Console Applikation kleines Programm welches die Semikolons gegen Tab's austauscht.
Module Module1
Sub Main()
Dim read As String = My.Computer.FileSystem.ReadAllText("C:\test\daten.txt")
read = read.Replace(";", Chr(9))
My.Computer.FileSystem.WriteAllText("c:\test\daten.txt", read, False)
End Sub
End Module
Alle Ö Ü Ö usw, werden nach der Bearbeitung falsch in der Datei dargestellt, in der eingelesenen Datei ist noch alles richtg. Habt ihr dazu einen Tipp? Eigentlich dachte ich, ich lese die Zeichen ein, tausche nur Semi gegen Tab und schreibe das ganze wieder. Aber dem scheint nicht so zu sein, der Zeichensatz wird dabei wohl auch noch geändert. Wie kann ich das verhindern? Ich denke es liegt auch an der Konsolen Anwendung.
Ich habe schon den Parameter System.Text.Enconding mit verschiedenen Werten versucht, Default, ASCII, Unicode, BigEndianUnicode aber immer werden die Umlaute nicht in Ruhe gelassen.
Gruß aus Berlin
Hawk
Module Module1
Sub Main()
Dim read As String = My.Computer.FileSystem.ReadAllText("C:\test\daten.txt")
read = read.Replace(";", Chr(9))
My.Computer.FileSystem.WriteAllText("c:\test\daten.txt", read, False)
End Sub
End Module
Alle Ö Ü Ö usw, werden nach der Bearbeitung falsch in der Datei dargestellt, in der eingelesenen Datei ist noch alles richtg. Habt ihr dazu einen Tipp? Eigentlich dachte ich, ich lese die Zeichen ein, tausche nur Semi gegen Tab und schreibe das ganze wieder. Aber dem scheint nicht so zu sein, der Zeichensatz wird dabei wohl auch noch geändert. Wie kann ich das verhindern? Ich denke es liegt auch an der Konsolen Anwendung.
Ich habe schon den Parameter System.Text.Enconding mit verschiedenen Werten versucht, Default, ASCII, Unicode, BigEndianUnicode aber immer werden die Umlaute nicht in Ruhe gelassen.
Gruß aus Berlin
Hawk
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 121021
Url: https://administrator.de/forum/falscher-zeichensatz-121021.html
Ausgedruckt am: 04.04.2025 um 23:04 Uhr
2 Kommentare
Neuester Kommentar
Hallo hawk!
Vermutlich ist die Datei ("C:\test\daten.txt") in Unicode erstellt.
Open-Read: Parameter(4) Tristate = -1 (TristateTrue=Unicode) setzen
Open-Write: Parameter(3) Tristate = 0 (TristateFalse=Default )
Gruß Dieter
Vermutlich ist die Datei ("C:\test\daten.txt") in Unicode erstellt.
Open-Read: Parameter(4) Tristate = -1 (TristateTrue=Unicode) setzen
Open-Write: Parameter(3) Tristate = 0 (TristateFalse=Default )
Gruß Dieter
Hi ... .damit sollte es gehen
Dim Stream As IO.StreamReader = New IO.StreamReader("c:\Test.txt", System.Text.ASCIIEncoding.Default)
Dim read As String = Stream.ReadToEnd()
;)
Gruß
ricardo
Dim Stream As IO.StreamReader = New IO.StreamReader("c:\Test.txt", System.Text.ASCIIEncoding.Default)
Dim read As String = Stream.ReadToEnd()
;)
Gruß
ricardo
