PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Selection d'un dossier ftp. avec fRepSélecteur?
Selection d'un dossier ftp. avec fRepSélecteur?
Débuté par guillaume G., 19 oct. 2005 18:01 - 1 réponse
Posté le 19 octobre 2005 - 18:01
bonjour a tous :)
ceci est ma premiere requete sur le forum dev..

En fait g un projet de "scanner ftp" ou je dois afficher le contenu d'un ftp... pour ensuite afficher uniquement les nouveaux fichiers present sur celui ci a chaque scan et dans toute l'arborescence a la base ...

J'ai fait ceci sans probleme : je vous met mon source pour ceux que ca interesse ^^

////////////////////////////////////////////////////////////////////////////////////////////
Message("Connexion au ftp...")
ftpcon = FTPConnecte(Addresse,Nom_util,MDP,Port,Vrai,Timeout)
IF ftpcon = -1 THEN Info("Erreur de connection au ftp",ErreurInfo()) ; RETOUR
Message("Intégration des fichiers du ftp "+ Addresse+" en cours ...")
nfichier = FTPListeFichier(ftpcon, "/*.*", "ListeFic",FTPFichier,"/")
nrep = FTPListeFichier(ftpcon, "/*.*", "Listerep",FTPRépertoire,"")


SCAN :
FOR i = 1 TO nrep
nfichier += FTPListeFichier(ftpcon, ExtraitChaîne(rep,i,RC), "ListeFic",FTPFichier,ExtraitChaîne(rep,i,RC))
nsubrep += FTPListeFichier(ftpcon, ExtraitChaîne(rep,i,RC), "Listerep",FTPRépertoire, ExtraitChaîne(rep,i,RC))
FenRepeint()
END
IF rep <> "" THEN
rep = rep[[Position(rep,ExtraitChaîne(rep,nrep+1,RC,DepuisDébut),1,DepuisDébut) A ]]
nrep = ChaîneOccurrence(rep,RC)
nsubrep = 0
GOTO SCAN
END
Message("deconnection ftp...")
FTPDéconnecte(ftpcon)
Message("Intégration des fichiers terminée ! ")
Fen_scan.Libellé_nbr_ligne = "Nombre de nouveau(x) fichier(s) : "+nb_new_fichier
////////////////////////////////////////////////////////////////////////////////////////////////

Mais on me demande d'implementer une nouvelle option qui est de selectionnez le repertoire root du ftp qui peut etre autre que "/"...
et la je narrive pas a faire une selectione valable de la chose...

J'ai essayer avec :
fRepSélecteur(" du repertoire site")
mais cela ne marche pas il me pointe l'arborescence sur le bureau... :/
Quelqu'un a-t'il deja ecrit une sorte de fonction ftprepselecteur???
ou y atil une subtilité que je n'ai pas saisie avec frepselecteur pour les ftp?

merci de votre aide :p
Posté le 20 octobre 2005 - 01:28
bonjour a tous :)
ceci est ma premiere requete sur le forum dev..

En fait g un projet de "scanner ftp" ou je dois afficher le contenu d'un
ftp... pour ensuite afficher uniquement les nouveaux fichiers present sur
celui ci a chaque scan et dans toute l'arborescence a la base ...

J'ai fait ceci sans probleme : je vous met mon source pour ceux que ca
interesse ^^

////////////////////////////////////////////////////////////////////////////////////////////
Message("Connexion au ftp...")
ftpcon = FTPConnecte(Addresse,Nom_util,MDP,Port,Vrai,Timeout)
IF ftpcon = -1 THEN Info("Erreur de connection au ftp",ErreurInfo()) ; RETOUR
Message("Intégration des fichiers du ftp "+ Addresse+" en cours ...")
nfichier = FTPListeFichier(ftpcon, "/*.*", "ListeFic",FTPFichier,"/")
nrep = FTPListeFichier(ftpcon, "/*.*", "Listerep",FTPRépertoire,"")


SCAN :
FOR i = 1 TO nrep
nfichier += FTPListeFichier(ftpcon, ExtraitChaîne(rep,i,RC),
"ListeFic",FTPFichier,ExtraitChaîne(rep,i,RC)) nsubrep +=
FTPListeFichier(ftpcon, ExtraitChaîne(rep,i,RC), "Listerep",FTPRépertoire,
ExtraitChaîne(rep,i,RC)) FenRepeint() END
IF rep <> "" THEN
rep =
rep[[Position(rep,ExtraitChaîne(rep,nrep+1,RC,DepuisDébut),1,DepuisDébut) A
]] nrep = ChaîneOccurrence(rep,RC) nsubrep = 0
GOTO SCAN
END
Message("deconnection ftp...")
FTPDéconnecte(ftpcon)
Message("Intégration des fichiers terminée ! ")
Fen_scan.Libellé_nbr_ligne = "Nombre de nouveau(x) fichier(s) :
"+nb_new_fichier
////////////////////////////////////////////////////////////////////////////////////////////////

Mais on me demande d'implementer une nouvelle option qui est de selectionnez
le repertoire root du ftp qui peut etre autre que "/"... et la je narrive pas
a faire une selectione valable de la chose...

J'ai essayer avec :
fRepSélecteur(" du
repertoire site") mais cela ne marche pas il me pointe l'arborescence sur le
bureau... :/ Quelqu'un a-t'il deja ecrit une sorte de fonction
ftprepselecteur??? ou y atil une subtilité que je n'ai pas saisie avec
frepselecteur pour les ftp?

merci de votre aide :p


ben a priori je dirais que le sélecteur de répertoire windows (puisque
c'est ce que fait frepselecteur) n'est pas vraiment fait pour faire de
la navigation FTP et que je ne vois pas trop comment tu pourrais
l'utiliser...
AMHA tu vas être obligé de développer une petite fenêtre qui reprend
l'arborescence de ton ftp et de fournir le choix de cette façon... (à
la façon d'un client ftp classique...)