WINHTTP.WINHTTPREQUEST.5.1 PERDA DE DADOS

TIGER 12/05/2014 17:32:24
#438111
Olá boa Tarde pessoal.
Estou usando o seguitne Codigo para fazer download de Arquivos na Net
  [ô]Crio o Objeto responsavel  para fazer a requisição via HTTP
Set RequisicaoHTTP = CreateObject([Ô]WINHTTP.WinHttpRequest.5.1[Ô])

[ô]abro a URL peloe Metodo GET
RequisicaoHTTP.Open [Ô]POST[Ô], URLCodifica(UrlOrigem), False
[ô]Envio a Requisição para o Link desejado
DoEvents

RequisicaoHTTP.Send

[ô]Se aconteceu algum erro altero o status
If Err.Number <> 0 Then
MsgBox [Ô]Erro ao baixar Arquivo ![Ô] & Err.Description
Exit Sub
Else
[ô]Caso não ocorra erro abro o arquivo de destino e salvo o arquivo retornado que está em Byte
Open PastaDestino For Binary As #1
DadoByte() = RequisicaoHTTP.ResponseBody
Put #1, 1, DadoByte()
Close #1
[ô]seto o status como Sucesso


End If
[ô]Destrui o objeto em memoria
Set RequisicaoHTTP = Nothing


Porém estou notando que alguns arquivos que eu baixo com este código.
não estão sendo baixados totalmente,ele só baixa um pequeno pedaço do Arquivo.
com isso estou tendo diversos problemas.
Alguem sabe qual e a melhor forma de se baixar arquivos em de um site ?
Ou se existe algo que eu possa fazer para que não tenha esta perda de Dados no processo de Download ?
Desde já muito obrigado
Faça seu login para responder