Gambas France BETA


Pas de compte ? Incription

Envoyer un fichier par FTP

Ce sujet est résolu.

1
AuteurMessages
lapenduledargent#1 Posté le 28/11/2011 à 08:36:08
Bonjour,

Je souhaite envoyer une photo dans un répertoire de mon serveur.
Je pense le faire par FTP. J'essaie le composant gb.net.curl.
J'ai suivi la méthode de Sphéris : http://gambaslinux.eg2.fr/articles.php?lng=fr&pg=919
Mais lorsque je me connecte, j'ai le message d'erreur suivant : FtpClient1_Error() Message.Info("erreur d'envoi de fichier. Veuillez recommencer")

Avec Filezilla, j'ai pas de soucis, donc, mot de passe et login sont corrects.

Voila mon code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
PUBLIC SUB Button2_Click()

FTPClient1.url = "ftp://monserveur/repertoire/repertoire/html/image/"
FTPClient1.user = "****"
FTPClient1.Password = "****"
FtpClient1.Timeout = 4
FTPClient1.Put("/home/arthur/ERP-pendule/Tmp/im.png")

END

PUBLIC SUB FtpClient1_Error()
Message.Info("erreur d'envoi de fichier. Veuillez recommencer")
END

PUBLIC SUB FtpClient1_Connect()
Message.Info("en cours de connexion...")
END

PUBLIC SUB FtpClient1_Finished()
Message.Info("Envoi fait avec succes.Vous pouvez fermer GBtest")
END

linuxos#2 Posté le 28/11/2011 à 10:48:11
Un peu de sel, de poivre et la crevette sera... Je pense qui faut re-préciser le nom du fichier ici:

FTPClient1.url = "ftp://monserveur/repertoire/repertoire/html/image/NOM_DU_FICHIER"

Olivier
Lorsqu'on s'occupe d'informatique, il faut faire comme les canards... Paraître calme en surface et pédaler comme un forcené par en dessous.
lapenduledargent#3 Posté le 28/11/2011 à 11:46:19
Bonjour Olivier,

Tu as raison, ça fonctionne à présent.

Merci et bonne semaine

Pierre
1