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

Des exemples d'utilisation des fonctions du WLangage

Rien de tel qu'un exemple pour comprendre une fonction de WLangage. Dans cette section, vous trouverez des exemples simples.

Des exemples évolués, où la fonction est utilisée en contexte, sont également disponible sur ce site.

Aller à la page des exemples évolués

FTPAttribut (en anglais FTPAttribute)

// Connaître les attributs du fichier
// "/Documents/Fichier.Doc" présent sur le serveur FTP
ResAttributs = FTPAttribut (NumConnexion, "/Documents/Fichier.Doc")


Début de la page

FTPCommande (en anglais FTPCommand)

// Connexion du poste en cours au serveur FTP
NumConnexion = FTPConnecte("192.54.12.8")
// demande du système du serveur
SI FTPCommande (NumConnexion,"SYST",reponse) ALORS
    Info("Information sur le système du serveur : "+ RC +reponse)
SINON
    Info("Le serveur n'accepte pas la commande SYST."+ ...
        "L'information sur le système du serveur n'est pas disponible")
FIN
//demande de la liste des fichiers du répertoire courant
SI FTPCommande (NumConnexion,"LIST",reponse, liste) ALORS
    //voici la liste des fichiers du répertoire en cours sur le serveur
    Info("Voici la liste des fichiers du répertoire"+ ...
          " en cours sur le serveur : "+ RC +liste)
FIN


Début de la page

FTPConnecte (en anglais FTPConnect)

// Connexion du poste en cours au serveur FTP
ResConnecte = FTPConnecte ("192.54.12.8")


Début de la page

FTPDate (en anglais FTPDate)

// Connaître la date de modification du fichier
// "/Documents/Fichier.txt" présent sur le serveur FTP
ResDate = FTPDate (NumConnexion, "/Documents/Fichier.txt")


Début de la page

FTPDeconnecte (en anglais FTPDisconnect)

// Connexion à un serveur FTP
nConnexion est un entier = FTPConnecte("192.108.10.2")
...
// Déconnexion
FTPDéconnecte (nConnexion)


Début de la page

FTPEnvoie (en anglais FTPSend)

// Transfert du fichier "C:\MesDocuments\Fichier.DOC"
// dans le répertoire "/Temp" sur le serveur FTP
ResEnvoie = FTPEnvoie (NumConnexion, "C:\MesDocuments\Fichier.DOC", "/Temp")


Début de la page

FTPEnvoie (en anglais FTPSend)

// Transfert du fichier "\MesDocuments\Fichier.TXT"
// dans le répertoire "/Temp" sur le serveur FTP
ResEnvoie = FTPEnvoie (NumConnexion, "\MesDocuments\Fichier.TXT", "/Temp")


Début de la page

FTPEnvoie (en anglais FTPSend)

// Transfert du fichier "Fichier.DOC" présent dans
// le répertoire _WEB de l'application
// vers le répertoire "/Temp" sur le serveur FTP
ResEnvoie = FTPEnvoie (NumConnexion, fRepWeb()+"\Fichier.DOC", "/Temp")


Début de la page

FTPHeure (en anglais FTPTime)

// Connaître l'heure de modification du fichier
// "/Documents/Fichier.txt" présent sur le serveur FTP
ResHeure = FTPHeure (7, "/Documents/Fichier.txt")


Début de la page

FTPListeFichier (en anglais FTPListFile)

// Liste les fichiers .BMP présents dans
// "/Documents" sur le serveur FTP.
// La procédure AttributFichier retourne le
// nombre de fichiers en lecture seule.

ResListeFichier = FTPListeFichier (7, ...
             "/Documents/*.bmp", "AttributFichier")


Début de la page

FTPNom (en anglais FTPName)

// Nom du dernier fichier accédé par une fonction FTP
ResNom = FTPNom ()


Début de la page

FTPRecupere (en anglais FTPGet)

// Récupération du fichier "/Document/Fichier.txt" présent sur le serveur FTP
// dans le répertoire "D:\Temp" sur le poste en cours
ResRécupère = FTPRécupère (7, "/Document/Fichier.txt", "D:\Temp")


Début de la page

FTPRecupere (en anglais FTPGet)

// Récupération du fichier "/Document/Fichier.txt" présent sur le serveur FTP
// dans le répertoire "\Temp" sur le poste en cours
ResRécupère = FTPRécupère (7, "/Document/Fichier.txt", "\Temp")


Début de la page

FTPRenommeFichier (en anglais FTPRenameFile)

// Le fichier "/Documents/Fichier.txt" est renommé "/Documents/Essai.txt"
Res = FTPRenommeFichier (7, "/Documents/Fichier.txt", "/Documents/Essai.txt")


Début de la page

FTPRepCree (en anglais FTPMakeDir)

// Création du répertoire "/Documents/Fichier" sur le serveur FTP
ResRepCréation = FTPRepCrée (7, "/Documents/Fichier")


Début de la page

FTPRepEnCours (en anglais FTPCurrentDir)

// Identifier le répertoire en cours sur le serveur FTP
ResRepEnCours
= FTPRepEnCours ( 7 )


Début de la page

FTPRepSupprime (en anglais FTPRemoveDir)

// Suppression du répertoire "/Documents/Fichier" du serveur FTP
ResRepSuppression = FTPRepSupprime (7, "/Documents/Fichier")


Début de la page

FTPSupprimeFichier (en anglais FTPDeleteFile)

// Suppression du fichier "/Documents/Fichier.DOC" du serveur FTP
ResSuppression = FTPSupprimeFichier (7, "/Documents/Fichier.DOC")


Début de la page

FTPTaille (en anglais FTPSize)

// Connaître la taille du fichier "/Documents/Fichier.Doc"
// présent sur le serveur FTP
ResTaille = FTPTaille (7, "/Documents/Fichier.Doc")


Début de la page