pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués


Le code suivant permet d'afficher les différents éléments du chemin d'un fichier.



// Déclaration des variables
ResExtension est une chaîne
ResFichier est une chaîne
ResRépertoire est une chaîne
ResDisque est une chaîne
CheminFichier est une chaîne
// Sélection d'un fichier
CheminFichier = "C:\MesRépertoires\Fichier.txt"
// Récupération des différents éléments du chemin
ResExtension= fExtraitChemin (CheminFichier, fExtension )
ResFichier = fExtraitChemin (CheminFichier, fFichier )
ResRépertoire = fExtraitChemin (CheminFichier, fRépertoire )
ResDisque = fExtraitChemin (CheminFichier, fDisque )
// Affichage des différents éléments du chemin
Info("L'extension du fichier est : "+ResExtension+ RC +...
       "Le nom du fichier est : "+ResFichier+ RC +...
       "Le(s) répertoire(s) est(sont) : "+ResRépertoire+ RC +...
       "Le disque est : "+ResDisque)


Le code suivant permet d'afficher les différents éléments du chemin d'un fichier.



// Déclaration des variables
ResExtension est une chaîne
ResFichier est une chaîne
ResRépertoire est une chaîne
CheminFichier est une chaîne = "\Mes Fichiers\Fichier.TXT"
// Récupération des différents éléments du chemin
ResExtension= fExtraitChemin (CheminFichier, fExtension )
ResFichier = fExtraitChemin (CheminFichier, fFichier )
ResRépertoire = fExtraitChemin (CheminFichier, fRépertoire )
// Affichage des différents éléments du chemin
Info("L'extension du fichier est : "+ResExtension+ RC +...
      "Le nom du fichier est : "+ResFichier+ RC +...
      "Le(s) répertoire(s) est(sont) : "+ResRépertoire)