German CSV erstellen - Sonderzeichen sind falsch

brunnlechner

Member
Licensed User
Longtime User
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

Well-Known Member
Licensed User
Longtime User
Vielleicht hilft Dir das etwas: Der Text muss UNICODE (UTF-8) haben.
 

brunnlechner

Member
Licensed User
Longtime User
Hallo JOTHA, danke für die Antwort.

Ich habe folgendes versucht:

B4X:
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

Expert
Licensed User
Longtime User
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

Member
Licensed User
Longtime User
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.
 
Top