Oi Marcio,

Este código é adaptado do meu livro "Desenvolvendo Soluções XML com Visual FoxPro", da Axcel Books:

LOCAL loHTTP as MSXML2.XMLHTTP 

loHTTP = CREATEOBJECT("MSXML2.XMLHTTP") 
loHTTP.open("GET","http://www.ilabore.com.br/VFP8_FabioVazquez.zip",.F.) 

WAIT WINDOW "Baixando arquivo..." 
loHTTP.send() 
WAIT CLEAR 

STRTOFILE(loHTTP.responseBody, "\Arq.Zip") 

loHTTP = null 

Um abraço!