GB.net.curl et FTP( Temps de lecture estimé à 1 min 11 sec )
Bonjour,
aujourd'hui nous allons nous interesser a la fonction FTP intégrée dans Gambas
Tout d'abord, il vous faut dans votre nouveau projet ajouter le composant GB.NET.CURL, la couche réseau de haut niveau.
Ensuite, nous allons poser un nouveau widget sur notre Form. Sélectionnez le dans l'onglet Network.
Voici maintenant le fonctionnement très simple de ce widget.
LA propriété URL :
Il s'agit du nom de fichier sur le serveur ftp
exemple :
FTPClient1.url = "ftp://ftpperso.free.fr/monfichier.txt"
Pour se connecter, il suffit de renseigner la propriété User et password comme ceci :
FTPClient1.user = "monlogin"
FTPClient1.paswword = "monpassword"
FtpClient1.Timeout = 4
Timeout est le nombre de tentative de connexion au serveur ftp
Detaillons maintenant les methodes :
Si une erreur survient lors de l'envoi ou réception de fichier, cette methode sera exécutée :
PUBLIC SUB FtpClient1_Error()
Message.Info("erreur d'envoi de fichier. Veuillez recommencer")
END
Lors de la connexion cette methode est exécutée :
PUBLIC SUB FtpClient1_Connect()
lresultat.Text = "en cours de connexion..."
END
Lorsque l'envoi ou la réception est effectuée, cette méthode est exécutée :
PUBLIC SUB FtpClient1_Finished()
lresultat.Text = "Envoi fait avec succes.Vous pouvez fermer GBtest"
END
Tout ca c'est bien mais comment peut on envoyer des fichiers sur le serveur ???
par cette commande :
FtpClient1.Put("/home/user/monfichier.txt")
et pour recevoir un fichier :
FtpClient1.get("monfichier.txt")
n'oublions pas de fermer la connexion au serveur par :
FtpClient1.close
Voilà pour aujourd'hui.
Merci à Manu et LinuxOs pour leur aide précieuse.