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.

Format de la fonction :

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

Identifie le nom de la section à écrire.

value

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>
nom_fichier

Indique le nom du fichier d'initialisation.

En cas de réussite, la fonction renvoie la valeur True. Dans le cas contraire, elle renvoie la valeur False.

Exemple :

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