Discussion :

[laurent88]

Bonjour,
J'ai une application qui utilise sans problèmes l'IdFtp depuis plusieurs années
et depuis la D11, elle ne fonctionne plus:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
  lFileFtp, lDir, lFileName : string;
  lIdFtp : TIdftp;
begin
  lIdFTP := TIdFTP.Create(nil);
  lIdFTP.TransferType := ftBinary;
  lIdFTP.Username := '***';
  lIdFTP.Password := '***';
  lIdFTP.Host :=  '*.*.*.*';
  lIdFTP.Connect;
 
  lFileftp := '___.txt';
  lIdFtp.ChangeDir('/var/ftp/****/');
  lDir :='___';
   lIdFTP.Get(lFileName, lDir+lFileName, False, False);

le connect se passe bien, lors du .get:

exception du débogueur

Le projet a déclenché la classe d'exception EIdAcceptTimeout avec le message 'Délai d'acceptation dépassé.*.

Quelqu'un a-t-il rencontré ce genre de problème?

[ShaiLeTroll]

Verifie le ReadTimeOut, peut-être une valeur par défaut plus faible en D11, tente aussi le PassiveMode

Pense à gerer un try finally pour CreateFree et un try except autour du Get et du Connect/Disconnect, rien que pour gérer le EGracefullyTruc ...

[laurent88]

Le Passiv mode a l'air de fonctionnner

Je vais suivre tes conseils pour la boucle Try

Merci Nickel