FTP CLIENT work in CABLE does not work on ADSL ?

Giganews Newsgroups
Subject: FTP CLIENT work in CABLE does not work on ADSL ?
Posted by:  Edward. Z. F. M (edward.z.f…@gmail.com)
Date: Fri, 10 Nov 2006

What is wrong in my code ?

on my machine(CABLE MODEM CONECTION), and all work fine, but in another
machine (ADSL CONNECTION) the code does not work.

It a simple FTP CLIENT !

        IdFTPClient->Disconnect();
        IdFTPClient->Host = "200.201.25.45";
        IdFTPClient->Username = "U";
        IdFTPClient->Password = "P";
        IdFTPClient->Port = 21;
        IdFTPClient->TransferType = ftBinary;
        try
        {
          IdFTPClient->Connect();
        }
        __except(true)
        {
          IdFTPClient->Disconnect();
        }
        try
        {
          Dir = IdFTPClient->RetrieveCurrentDir();
        }
        __except(true)
        {
          IdFTPClient->Disconnect();
        }
        try
        {
          IdFTPClient->ChangeDir("testdir");
        }
        __except(true)
        {
          IdFTPClient->Disconnect();
        }

        if(FileExists( Arq))
        {
          try
          {
            IdFTPClient->Put(Dir + Arq, Arq, false);
          }
          __except (TRUE)
          {
            IdFTPClient->Disconnect();
          }
        }
        IdFTPClient->Disconnect();

Thanks

Edward

Replies