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 #
| Parameter | Typ | Beschreibung |
|---|---|---|
Text | String | Der zu speichernde Text |
Location | String | Dateiname oder Registry-Pfad (Präfix registry:// für Registry) |
Options | Variant | Optionsstring (optional) |
Optionen #
| Option | Beschreibung |
|---|---|
Charset | Zeichenkodierung: UTF-8, UTF-16, UTF-16BE, ibm437 (MS-DOS) oder andere Windows-Zeichensätze |
WriteBOM | Byte-Order-Mark schreiben (TRUE oder FALSE, Standard: TRUE) |
Overwrite | Vorhandene Datei überschreiben (TRUE oder FALSE, Standard: TRUE) |
Append | An 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