German Textcodierung

[Claus]

Wenn ich versuche eine (unter Windows mit Excel erstellte) csv-datei
zu lesen, werden Zeichen wie 'äöüß' als Fragezeichen dargestellt.

Dim TextReader1 as TextReader
TextReader1.Initialize(File.Openinput(FilePath, FileName))
Log(TextReader1.ReadLine)
TextReader1.Close

Mit einem Android Editor werden die Zeichen auch nur
mit der Einstellung 'Latin 1' richtig dargestellt.
ASCII oder UTF8 stellt den Text auch nicht richtig dar.


Wie kann ich einen Text mit der richtigen Codierung laden?

Gruß Claus

 

[klaus]

Ersetze:

TextReader1.Initialize(File.Openinput(FilePath, FileName))

durch

TextReader1.Initialize2(File.Openinput(FilePath, FileName), "Windows-1252")

Beste Grüsse.