Encoding von Text-/INI-Dateien

isnoguter
Beiträge: 56
Registriert: 23 Jul 2014, 07:03

Encoding von Text-/INI-Dateien

Beitragvon isnoguter » 13 Mai 2019, 10:54

Hallo,

wir nutzen IBM-Notes und ich möchte in der notes.ini ein paar Einträge setzen.

Das Skript funktioniert, verändert mir aber das Encoding der Datei.

Code: Alles auswählen

DefVar $NotesINI$
Set $NotesINI$    = "%CurrentProfileDir%\AppData\Local\IBM\Notes\Data\notes.ini"

Patches_notes.ini $NotesINI$

[Patches_notes.ini]
set [Notes] $ServerMailAddressing=1
set [Notes] TypeaheadShowServerFirstDefault=1
set [Notes] $locDD=1
set [Notes] TypeaheadShowServerFirst=1
set [Notes] $locCB=1


Mit dem opsi script manual habe ich mir folgendes überlegt. Es funktioniert alles wie ich mir das vorstelle, ich würde nur gern wissen ob es einen kürzeren/einfacheren Weg gibt.

Code: Alles auswählen

DefVar $NotesINI$
Set $NotesINI$    = "%CurrentProfileDir%\AppData\Local\IBM\Notes\Data\notes.ini"

;Inhalt der notes.ini auslesen
DefStringList $list1$
set $list1$ = loadTextFileWithEncoding($NotesINI$, "cp1252")
      
;Inhalt der zur notes.ini hinzugefügt wird
DefStringList $list2$
set $list2$ = createStringList ('$ServerMailAddressing=1','TypeaheadShowServerFirstDefault=1', '$locDD=1', 'TypeaheadShowServerFirst=1', '$locCB=1')
      
;zusammenfügen der beiden String-Listen
DefStringList $list$
set $list$ = addListToList($list1$, $list2$)
      
;speichern der notes.ini
if (saveTextFileWithEncoding($list$, $NotesINI$, "cp1252"))
endif


Viele Grüße