PC SOFT

DOCUMENTATION EN LIGNE
DE WINDEV, WEBDEV ET WINDEV MOBILE

  • Exemple : Dénombrer les fichiers présents dans un répertoire d'un site FTP.
FTPListeFichier (Exemple)
Exemple : Dénombrer les fichiers présents dans un répertoire d'un site FTP.
WINDEVWEBDEV - Code ServeurEtats et RequêtesWindows MobileJavaAjaxCode Utilisateur (MCU) Cet exemple permet de lister les fichiers de type .JPG présents dans le répertoire en cours du site "ftp.cdrom.com". Pour chaque fichier trouvé par la fonction FTPListeFichier, la procédure ListeFic est lancée. Cette procédure permet de compter le nombre de fichiers d'extension ".JPG".
// Connexion à un site FTP
nConnexion est un entier
nConnexion = FTPConnecte("ftp.cdrom.com")

nFichier est un entier  // Nombre de fichiers présents dans le répertoire
nJPG est un entier // Nombre de fichiers .JPG
nJPG = 0

// On liste les fichiers du répertoire en cours
nFichier = FTPListeFichier(nConnexion, "", "ListeFic", ftpFichier, nJPG)
Info("Il y a" + nJPG + "fichiers .JPG sur" + nFichier + "fichiers listés")
// Procédure appelée par FTPListeFichier
PROCEDURE ListeFic(Nom, nTaille, sAttribut, sDate, sHeure, nParam)
SI Droite(Nom, 4) = ".JPG" ALORS
nParam++
FIN
RENVOYER Vrai
Version minimum requise
  • Version 9
Documentation également disponible pour…
Commentaires
nparam
précision sur l'exemple:
Merci Marc77

le paramètre passé dans l'exemple
FTPlistefichier(...., nJPG) ne fait qu'ENVOYER un paramètre à la procédure et non pas en recevoir!
la modification de Marc77 fonctionne sans passer gnNombre en paramètre

j'utilise ce paramètre pour chercher l'existence d'un repertoire:
Ex:
nFichier = FTPListeFichier(nConnexion, "", "ListeFic", ftpRépertoire,"MONREP")

nFichier renverra le nombre de fichiers listés, et la variable globale gnombre sera ainsi à 1 ou 0
APIDV
06 oct. 2016
nParam
Bonjour,

Pour que le nombre soit retourné la variable doit être de type globale.

Si la variable est déclarée dans le bouton de recherche, la valeur n'est pas
récupérée

MaFenetre (déclarations globales)
gnNombre est un entier

MonBouton (clic)
nFichier = FTPListeFichier(nConnexion, "", "ListeFic", FTPFichier, gnNombre)

Marc77
08 oct. 2015