segunda-feira, 4 de março de 2013

Postar em um FTP


 
Neste evento foi utilizado o componentes "IDFTP", e mesmo está copiando um arquivo já criado e copiando para um ftp


    // Conecta  no FTP
     with IdFTP do try

      IdFTP.Disconnect;
      IdFTP.Host     := 'ipservidor';
      IdFTP.Port     := porta;
      IdFTP.Username := usuario;
      IdFTP.Password := senha;
      IdFTP.Passive  := false;
      IdFTP.Connect;

     finally
    end;


\\ Copia o arquivo para o FTP
     try

      IdFTP.ChangeDir(pastadoservidor);
      IdFTP.Put('C:\pasta onde o arquivo está', 'nome do arquivo', false);

     finally

      IdFTP.Disconnect;

    end;


// em um caso contrário deve-se usar o comando IdFTP.Get('C:\pasta onde o arquivo está', 'nome do arquivo', false);
E a propriedade       IdFTP.Passive  := True;

Nenhum comentário:

Postar um comentário