UpsFts.ClientFtp.Abandonner


Rappel Abandonner();

Description

La méthode de rappel Abandonner est appelée dès lors que le client désire abandonner le transfert de fichier en cours.

Il n'y aura alors plus d'appel aux méthodes LireFlux ou EcrireFlux pour le transfert courant.

La valeur de retour doit suivre la convention de fonctionnement de l'énuméré RappelReponse.

Cette méthode de rappel correspond à la réception de la commande ABOR du protocole File Transfer Protocol (FTP).

Exemple


/****************************************************************/

Rappel ClientFtp.Abandonner()

/* Objet : Abonne le transfert. */

/****************************************************************/

Variable

/******/

   MonClient : MonClientFtp;



Debut

MonClient=MonClientFtp(LireExtension("AppFts"));

Si ActiverJournal Alors

   EcrireJournal(MonClient, "Abandonner()");

Fin Si

Si MonClient.FichierATransferer!=Nul Alors

   Selon MonClient.FichierATransferer.ModeOuverture Faire
   
      Cas Dans (LectureTexte, LectureBinaire) Faire
      
         MonClient.FichierATransferer.Fermer();

         MonClient.FichierATransferer=Nul;
      
      Fin Cas

      

      Cas Dans (EcritureTexte, EcritureTexteALaSuite, LectureEcritureTexte, EcritureBinaire, EcritureBinaireALaSuite, LectureEcritureBinaire) Faire
      
         MonClient.FichierATransferer.Fermer();

         MonClient.FichierATransferer=Nul;

         UpsSys.SupprimerFichier(MaPartition+MonClient.NomFichier);

         MonClient.NomFichier=Nul;
      
      Fin Cas
   
   Fin Selon

Fin Si

Retourner RappelSucces;

Fin Rappel

Voir aussi

EcrireFlux et LireFlux pour effectuer un transfert de fichier.

Traduction


-	-	-	-	-	-	-	-	-