GLOBAL
gfsFichierIni est une chaîne = fRepEnCours() + "\WD7 Navigateur.ini"
LOCAL
sURL est une chaîne = ""
nIndice est un entier = 1
// Parcourir le fichier . ini
BOUCLE
// Lire le nom de l´URL dans le fichier . ini
sURL = INILit("URL", "URL" + nIndice, "", gfsFichierIni)
// Condition de sortie
SI sURL = "" ALORS SORTIR
// Ajouter l´adresse dans la combo URL
ListeAjoute(URL, sURL)
nIndice++
FIN
// Charger l´activeX dynamiquement
ChargerActiveX()
nIndice est un entier = 0
// Parcourir la combo
POUR nIndice = 1 A ListeOccurrence(URL)
// Sauvegarder la liste des URL dans le fichier . INI
INIEcrit("URL", "URL" + nIndice, URL[nIndice], gfsFichierIni)
SI ErreurDétectée ALORS
// Erreur lors de l´écriture dans le fichier . ini
Erreur("Erreur d´écriiture dans le fichier " + gfsFichierIni)
FIN
FIN