FTP_Receive

4D v20

FTP_Receive


FTP_Receive ( ftp_ID ; cheminServeur ; cheminLocal ; progression ) -> Résultat

Paramètre	Type	Description
ftp_ID	Entier long	Référence d'une connexion FTP
cheminServeur	Texte	Chemin d'accès sur le serveur FTP du document à recevoir
cheminLocal	Texte	Chemin d'accès local de destination du document
		Chemin d'accès du document résultant (si "" passé)
progression	Entier	* Paramètre obsolète (ignoré) *
Résultat	Entier	Code d'erreur

Description

La commande FTP_Receive reçoit par FTP un fichier dont le chemin d'accès sur le serveur FTP est défini par cheminServeur. FTP_Receive retourne l'erreur -48 si le fichier existe déjà dans le répertoire de destination.

ftp_ID est l'identifiant de la session FTP établie avec FTP_Login.

Le paramètre cheminServeur spécifie le chemin d'accès Unix complet du document à recevoir. Si cheminServeur ne contient pas un chemin d'accès complet à un document, la commande retourne une erreur. Comme pour tous les chemins d'accès à des documents Unix, le chemin doit utiliser des barres obliques ("/") comme séparateurs. Pour plus d'informations sur ce point, reportez-vous à la section Glossaire et terminologie.

Le paramètre cheminLocal spécifie le chemin d'accès du document à créer localement.

Si vous passez une chaîne vide dans ce paramètre, la boîte de dialogue standard d'enregistrement de document s'affichera — dans ce cas, le nom et le chemin d'accès du fichier sélectionné par l'utilisateur seront retournés dans la variable cheminLocal.
Si vous passez uniquement un nom de fichier, le fichier sera enregistré dans le même dossier que le fichier de structure de la base de données (avec 4D monoposte) ou dans le dossier de 4D Client (avec 4D Server).

Comme pour tous les chemins d'accès à des documents locaux, les répertoires doivent être séparés par le délimiteur correspondant à la plate-forme utilisée. Pour plus d'informations, reportez-vous à la section Glossaire et terminologie.

Compatibilité : Le paramètre progression est obsolète et est ignoré s'il est passé.

Exemple

 vUtiliserMacBin:=-1

 $erreur:=FTP_MacBinary(vFTP_ID;vUtiliserMacBin)

 Si($erreur=10053)

    MacBinaryEstAccepte:=Faux `Le serveur ftp ne gère pas le protocole MacBinary

 Sinon

    MacBinaryEstAccepte:=Vrai

 Fin de si

 

 vFichierLocal:=""

 Si(MacBinaryEstAccepte)

    vUtiliserMacBin:=1

    $erreur:=FTP_MacBinary(vFTP_ID;vUtiliserMacBin) `Active MacBinary pour le téléchargement

    $erreur:=FTP_Receive(vFTP_ID;"CGMiniViewer.hqx";vFichierLocal)

    Si($erreur=0) & (vUtiliserMacBin=1)

       vCheminDecode:=""

       Si(IT_Decode(vFichierLocal;vCheminDecode;8)=0) `Décoder MacBinary

          SUPPRIMER DOCUMENT(vFichierLocal) `Si le décodage a réussi, supprimer le fichier source

       Fin de si

    Fin de si

 Fin de si

Voir aussi

FTP_MacBinary
IT_Decode