IdFTP : mon programme fonctionne bien chez moi (fonction idFTP.put) mais pas che
Goofyjp
Messages postés6Date d'inscriptionjeudi 16 octobre 2008StatutMembreDernière intervention26 janvier 2010
-
30 oct. 2008 à 16:59
Goofyjp
Messages postés6Date d'inscriptionjeudi 16 octobre 2008StatutMembreDernière intervention26 janvier 2010
-
31 oct. 2008 à 15:38
Bonjour
Plateforme de développement : Delphi 7
J'ai réalisé un client FTP à base du composant Indy : idFTP.
Ce programme tout simple permet d'écraser ou de supprimer un fichier sur un serveur distant et d'implémenter un fichier log. Le fichier visé sur le serveur FTP a toujours le même nom et son chemin d'accès est toujours le même
Chez moi, le programme que j'ai réalisé fonctionne parfaitement aussi bien sous Windows XP que sous Windows Vista.
Chez deux autres personnes (une sous Windows XP et l'autre sous Windows Vista), ce même programme ne fonctionne pas :(
Chez eux, mon programme se connecte pourtant correctement au serveur FTP puisque un test de GetCurrentDirectory sur le serveur montre qu'ils sont bien connecté et sont au bon endroit...
La procédure idFTP.Put est dans une structure :
// Transfert du PLN local => serveur 1
IdFTP1.ChangeDir('/' + strDossier1); // 1er dossier du profil
IdFTP1.TransferType := ftBinary;
try
IdFTP1.Put(strFPL, strFichier1, False);
except
ShowMessage('Erreur de transfert vers le serveur 1');
end;
Chez moi le try s'exécute comme prévu, chez les deux autres personnes c'est l'except qui s'exécute et le fichier n'est pas envoyé...
Pour lever le doute sur leur capacité de connection, s'ils utilisent le client FTP FileZilla ils obtiennent le résultat escompté. Leur connection a donc la capacité de faire ce qui est demandé dans mon programme.
Dans le doute, j'ai fait une deuxième version sans passer par le composant Indy, mais en passant par l'API Windows (WinNET). Même résultat : UpLoad OK chez moi, mais pas chez les autres...
Avez-vous une idée de l'origine du problème et une éventuelle solution à ce problème.