Bonjour,

Voilà mon problème...

J'expérimente l'utilsation des ftps et je suis le tuto que l'on peut trouver ici.

J'ai donc comme code pour tenter de me connecter :
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
16
17
18
19
procedure TfrmFtp.btnConnectClick(Sender: TObject);
begin
  if idftp1.Connected then idftp1.Disconnect;
  try
    EnableControls(false);
    idftp1.Host := tbServer.Text;
    idftp1.Username := tbUsername.Text;
    idftp1.Password := tbPassword.Text;
    idftp1.Port := strtoint(tbport.Text);
    idftp1.Connect;
  finally
    EnableControls(true);
  end;
  if idftp1.Connected then
    try
      idftp1.List(frmftp.lbFilesList.Items);
    except;
    end;
end;
Avec, pour tester :
  • server : ftp.borland.com
  • username : anonymous
  • password : mail@server.com
  • port : 21


J'arrive bien à me connecter à ce ftp en utilisant internet explorer mais via delphi avec le code ci-dessus, j'obtiens l'erreur suivante :
Project prjFtp.exe raised exception class EIdSocketError with message 'Socket Error # 10060 Connection timed out.'. Process stopped. Use Step or Run to continue.
Alors je comprends bien le "Connection timed out" mais la quesiton est "Pourquoi ?" Par contre pour ce qui est du "Socket error", je suis totalement ignorant. D'ailleurs, c'est quoi un socket ?

Quelqu'un aurait-il une idée pour m'aider ?

Merci d'avance.

Griftou.