[FTP] Récupérer des fichiers

**jeruzalem** · 05/10/2007, 17h22

Bonjour,

Je n'ai pas trouver si cette question à deja etait poser...

Je voudrais savoir si quelqu'un pouvais m'aider.
Je m'explique, j'utilise windev 10 express et je voudrais recuperer, sur ftp tous les fichiers datant de la veille.
J'arrive bien à la faire avec des fichiers spécifiques (fichiers connus mise à jour quotidiennement), mais je voudrais le faire avec tous les fichiers présents sur le ftp en question.

Merci d'avance pour vos réponse...
@+

**Jannus** · 05/10/2007, 17h43

Utilise FTPListeFichier() ça marche comme fListeFichier()

**jeruzalem** · 05/10/2007, 18h03

J'ai bien essayé mais ma procedure ne marche pas

Je voulais faire un test de publier tous les fichiers *jpg, mais ça n'a pas marché
Donc je supose que recuperer ces fichier ne marchera pas non plus

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
nbfic = FTPListeFichier(nidconnexion,"","Listefic",FTPFichier,nbjpg)
Info("Il y a " + nbjpg + " fichiers .jpg sur " + nbfic + " fichiers sur le serveur.")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
PROCEDURE Listefic(Nom, nTaille, sAttribut, sDate, sHeure, nParam)
SI Droite(Nom,4) = ".jpg" ALORS
nParam ++
Fin
RENVOYER Vrai

Il me met "Il y a 0 fichiers .jpg sur 19 fichiers sur le serveur"
Alors que sur mon serveur j'ai bien 17 fichiers .jpg

Je ne trouve pas la solution

**Jannus** · 05/10/2007, 19h10

Normal, tu as inversé le type de fichier et le nom de la procédure

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Listefic est chaine = "*.jpg"
nbfic = FTPListeFichier(nidconnexion,"",Listefic,FTPFichier)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

PROCEDURE FTPFichier(Nom, nTaille, sAttribut, sDate, sHeure)

**jeruzalem** · 08/10/2007, 16h54

euh ça marche encore moins :s!! il me trouve plein d'erreur...

Normalement le code c'est ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<Résultat> = FTPListeFichier(<Identifiant de la connexion>, <Chemin et nom générique des fichiers>, <Nom de la procédure> [,<Fichiers/Répertoires> [,<Paramètre>]])

Donc mon code est bon...?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
nbfic = FTPListeFichier(nidconnexion,"",ListeFich,FTPFichier,nbjpg)
ça doit etre au niveau de la procedure non?
 
PROCEDURE ListeFich(Nom, nTaille, sAttribut, sDate, sHeure, nParam)
SI Droite(Nom,4) = ".jpg" ALORS
	nParam ++
FIN
RENVOYER Vrai

**Jannus** · 08/10/2007, 17h17

Non, il faut mettre quelque chose dans "nom de fichiers"
Par ex : "*.jpg" pour voir les .jpg

J'avais "sauté" les "" c'est cela qui m'a fait croire à une erreur de syntaxe.
J'ai pris ListeFich comme une variable avec le masque des fichiers

**jeruzalem** · 08/10/2007, 17h23

Malheureusment,

Meme avec "*.*", ça me donne le meme resultat

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nbfic = FTPListeFichier(nidconnexion,"",ListeFich,FTPFichier,nbjpg)

ce code sert juste a compter le nombre de fichier present sur le ftp (avec ou sans "*.*" (viens de tester

)

Apres j'affiche le message suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Info("Il y a " + nbjpg + " fichiers " sur " + nbfic + " fichiers sur le serveur.")

Et il me met: "Il y a 0 fichiers sur 19 fichiers sur le serveur."

Mais c'est au niveau de ma procedure que le nParam ne s'incremente pas, du coup nbjpg non plus.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
PROCEDURE ListeFich(Nom, nTaille, sAttribut, sDate, sHeure, nParam)
SI Droite(Nom,4) = ".jpg" ALORS
	nParam ++
FIN
RENVOYER Vrai

Alors deja j'arrive pas a faire ça
Alors dl juste les fichier de la veille...

**Jannus** · 08/10/2007, 17h39

Ok, je ne comprenais pas, je croyais qu'il ne lisait pas le serveur

C'est ton nParam qui ne sert à rien.
Si tu fais un trace tu verras qu'il se remet à 0 à chaque appel
Tu dois utiliser une variable globale à la fenêtre (ou au projet)

**jeruzalem** · 08/10/2007, 17h51

Yes

ça marche,
Maintenant il faut je fasse la meme mais pour dl ces fichiers...

Au fait voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
nbjpg est un entier = 0 (declaration globale)
 
PROCEDURE ListeFich(Nom, nTaille, sAttribut, sdate est une Date, sHeure, nParam)
SI Droite(Nom,4) = ".jpg" ALORS
	nbjpg ++

**jeruzalem** · 09/10/2007, 14h37

bon ben maintenant j'ai le souci pour dl les fichiers d'une certaine date:
(dsl)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Datejour est une Date = Saisiedate1 (Declaration globale)
 
PROCEDURE ListeFich(Nom, nTaille, sAttribut, sdate, sHeure, nParam)
SI sdate = Datejour ALORS
	FTPRécupère(nidconnexion,sdate,"C:\Documents and Settings\ID1\Bureau\Test")
FIN

Merci d'avance

**Jannus** · 09/10/2007, 14h45

Fais un Info() sur tes dates, c'est probablement une question de format

**jeruzalem** · 09/10/2007, 15h15

il me sort:

"20071009"

Mais je vois pas comment changer le format de sDate??
si toutefois il faut le changer

**Jannus** · 09/10/2007, 15h24

Envoyé par jeruzalem

il me sort: "20071009"

Pour les deux ?
sdate et Datejour ?

**jeruzalem** · 09/10/2007, 15h33

Euh pour

sDate = 20071005
(comprend po???)

datejour = 20071009

**Jannus** · 09/10/2007, 15h39

Donc c'est le même format, le problème ne vient pas de là

Par contre, selon ton code, tu ne récupères que les fichiers du jour, donc les fichier dont la date est 20071009
Tu ne saurais donc pas récupérer un fichier dont la date est 20071005

**jeruzalem** · 09/10/2007, 15h46

non mais si tu veux Datejour est = à un champ de saisie.
si je met 05/10/2007 Datejour sera egale à ça...

le souci c'est que quand je rentre dans la procedure

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SI sdate = Datejour ALORS
	FTPRécupère(nidconnexion,sdate,"C:\Documents and Settings\ID1\Bureau\Test")
FIN

pourquoi ça ne marche pas?
En gros oui je n'arrive pas a recupérer un fichier du 05/10/2007

**Tasumy** · 09/10/2007, 15h59

Bonjour,

la syntaxe est :

<Résultat> = FTPRécupère(<Identifiant de la connexion>, <Fichier/Répertoire à récupérer>, <Fichier/Répertoire destination> [[,<Nom de la procédure> [, <Mode de transfert>])

et toi tu passes sdate pour le fichier à récupérer, le problème vient sans doute de là...

**Jannus** · 09/10/2007, 16h02

Ce n'est plus du dépannage Windev ça, c'est un cours de programmation

Tu as tracé ton projet ?
Tu as vérifié :

que sDate et DateJour sont bien égaux et que tu entres bien dans ta consition ?
que nidconnexion a la bonne valeur ?
que le dossier de téléchargement existe ?

Tu dois aussi récrire correctement:
pas FTPRécupère() mais ResFTP=FTPRécupère()
La récupération du résultat de l'opération te permet de savoir ce qu'il se passe.

<Résultat> : Booléen
Vrai si le transfert a été effectué, Faux dans le cas contraire. Le compte rendu d'erreur détaillé peut être obtenu avec la fonction ErreurInfo . Le résultat de cette fonction peut être incorrect sur certains serveurs Unix : un fichier ou un répertoire existant peut ne pas être trouvé.

[Édit]
+1
comme le dit Tasumy, ta syntaxe de la commande FTPRécupère() est erronée

**jeruzalem** · 09/10/2007, 16h06

ok,
j'ai changé sDate par Nom.

Mais je vois que datejour est egale a 20071009 meme en ayant

Saisiedate1 = Datejour

Pourtant je rentre bien dans le champ de saisie 20071005

Ok je reecris tous, je verrais bien merci quand meme

**Jannus** · 09/10/2007, 16h09

Saisiedate1 = Datejour attribue au champ Saisiedate1 la valeur Datejour
Pour attribuer la valeur du champ à la variable tu dois faire le contraire :
Datejour=Saisiedate1

[FTP] Récupérer des fichiers

WinDev

Discussions similaires

Partager

Partager