German CSV erstellen - Sonderzeichen sind falsch

[brunnlechner]

Hallo,
mit saveCSV kann man einfach eine *.csv Datei erstellen, leider werden die Sonderzeichen wie ß in Excel falsch dargestellt. (Aus Straße wird Straße)

Dim su As StringUtils
su.SaveCSV(File.DirRootExternal, "1.csv", ";", list1)

Kennt jemand eine Möglichkeit, die Sonderzeichen richtig darzustellen.

Vielen Dank

 

[JOTHA]

Vielleicht hilft Dir das etwas: Der Text muss UNICODE (UTF-8) haben.

 

[brunnlechner]

Hallo JOTHA, danke für die Antwort.

Ich habe folgendes versucht:

Public Sub Export_(dir_ As String, File_ As String, content As String)
  Dim rows  As StringBuilder
  rows.Initialize
  Dim bytes() As Byte = Array As Byte(239,187,191)
  rows.Append(BytesToString(bytes,0,3,"UTF8"))
  rows.Append(content & CRLF )
  File.writestring(Modul1.sdcard, "Test.csv", rows.tostring)
End Sub

Es stimmen zwar die Sonderzeichen, aber leider erhalte ich keine .csv Datei mehr sondern nur eine Textdatei.

Falls Jemand eine Idee hat wie wan daraus eine funktionierende .csv erstellen kann wäre ich sehr dankbar.

Vielen Dank im Voraus

Franz

 

[DonManfred]

leider erhalte ich keine .csv Datei mehr sondern nur eine Textdatei

Wo liegt da der Unterschied? CSV heisst nix anderes als CommaSeparatedValues.
Üblicherweise ist eine CSV Datei eine Textdatei. Jede Zeile darin ist ein Eintrag der csv.

 

[brunnlechner]

Hallo Manfred, vielen Dank für Deinen Tipp,
ich habe als content statt der Liste einfachen
Text verwendet (Dim as string) und alles funktioniert bestens.