F�rum Tamanho do Arquivo no FTP #268150

11/02/2005

Amigos,

Preciso baixar um arquivo via ftp. Estou usando o componente IdFtp.
Esse arquivo eu comeco a tentar localizar se ja chegou no ftp de tempos em tempos... O que ocorre � o seguinte. Se o arquivo a ser disponibilizado no FTP for muito grande (2mb) e o meu sistema comecar a tentar baixa-lo logo que o mesmo esteja sendo transferido (ou seja alguem jogou o arquivo no ftp e antes mesmo dele chegar por completo o sistema j� tenta baixar), acontece de o sistema baixar o arquivo incompleto e pensar que est� completo e que baixou tudo...
Estou tentando colocar uns Sleep pra dar tempo de efetuar algumas opercaoes, mas alem de estar atrasando o funcionamento do sistema, nao est� dando certo... Se o tempo de download coincidir com o tempo de upload d� erro. (pois ele nao baixa o arquivo completo e pensa que baixou).

Minha saida foi tentar comparar o tamanho do arquivo no Ftp e no disco local, assim:

    If (FileExists(wLocal)) And (TamArquivo(wLocal) > 0) Then
    Begin

      While (Dm.IdFTP1.Size(wRemoto) > TamArquivo(wLocal)) Do
        Inc(Cont);

      If (Dm.IdFTP1.Size(wRemoto) <= TamArquivo(wLocal)) Then
        Result := �enviou�
      Else
        Result := �naoenviou�;

    End
    Else
      Result := �naoenviou�;
    End;

Mas ainda assim nao funciona...
Alguem tem alguma sugest�o!?

Rafaelunp

Curtir t�pico

+ 0

Responder

Posts

17/03/2005

Marciusbrandao

rafael,

Tive o mesmo problema. A minha solu��o foi fazer o upload do arquivo primeiro com a extens�o $$$ e quando terminar eu renomeio para XML :-).

Espero que tenha ajudado.

[]
Marcius

Responder

Gostei + 0