Rubrique précédente: WriteIniEntry : Stocker une valeur dans un fichier .iniRubrique suivante: ReadIniEntry – Extraire une valeur d'une section spécifiée


WriteIniSection – Crée ou remplace une section entière

Valide sous UNIX et Windows

La fonction WriteIniSection crée ou écrase une section entière d'un fichier d'initialisation (.ini) particulier. Si le fichier .ini n'existe pas, il est créé par cette fonction.

Cette fonction de fichier d'initialisation (.ini) présente le format suivant :

WriteIniSection(section as String, value as String, filename as String) as Boolean
section

Identifie le nom de la section à écrire. Si la section n'existe pas, elle est créée par cette fonction.

Valeur

Identifie les entrées à écrire. L'entrée du paramètre value doit avoir le format suivant :

Entry_1 = Value_1 <LF>
Entry_n = Value_n <LF>
filename

Indique le nom du fichier d'initialisation.

En cas de réussite, la fonction renvoie True, sinon elle renvoie False.

Exemple : Fonction WriteIniSection

Dim entries as String
Dim LF as String
LF = chr(10)
entries = "Entry_1 = Value_1" + LF + "Entry_n = Value_n"
Rem	cet exemple écrit la section LIST dans c:\temp\test.ini

Dim attrList as String

lf = chr(10)
attrList = "Entry_1=Value_1"+lf+"Entry_2=Value_2"

If Not(WriteIniSection("LIST", attrList, "c:\temp\test.ini")) Then
	MessageBox("Impossible de créer la section LIST", "DMS", MB_OK + MB_ICONEXCLAMATION)
	SetStatus(1)
	quitter
End If