Save Text
Zuletzt geändert: 14.03.2026 11:04

SaveText #

Speichert einen String als Datei oder als Registry-Wert. Zusammen mit LoadText bildet diese Methode das Gegenstück für den textbasierten Datenaustausch.

Client.SaveText Text, Location, Options

Parameter #

ParameterTypBeschreibung
TextStringDer zu speichernde Text
LocationStringDateiname oder Registry-Pfad (Präfix registry:// für Registry)
OptionsVariantOptionsstring (optional)

Optionen #

OptionBeschreibung
CharsetZeichenkodierung: UTF-8, UTF-16, UTF-16BE, ibm437 (MS-DOS) oder andere Windows-Zeichensätze
WriteBOMByte-Order-Mark schreiben (TRUE oder FALSE, Standard: TRUE)
OverwriteVorhandene Datei überschreiben (TRUE oder FALSE, Standard: TRUE)
AppendAn vorhandene Datei anhängen (TRUE oder FALSE, Standard: FALSE)

Das Optionsformat ist "charset=utf-8;writebom=0;append=1".

Beispiele #

Verschiedene Zeichenkodierungen #

Option Explicit

Dim sl, s, desktop
Set sl = Client.NewStrings("")
sl.Add "Umlaute: öäüÖÄÜ und ß"
sl.Add "Chinesisch: 系统正在测试中"
desktop = Client.Properties("FOLDER.DESKTOP") & "\"
s = sl.Text

Client.SaveText s, desktop & "SaveText_Ansi.txt"
Client.SaveText s, desktop & "SaveText (UTF-8 mit BOM).txt", "utf-8"
Client.SaveText s, desktop & "SaveText (UTF-16 mit BOM).txt", "utf-16"
Client.SaveText s, desktop & "SaveText (UTF8 ohne BOM).txt", _
  "charset=utf-8;writebom=0"

In die Registry schreiben #

Client.SaveText "Mein Wert", "registry://\USER\.ALLUSER\MeinSchlüssel\MeinWert"

Siehe auch #

  • LoadText – Text aus Datei oder Registry laden