I receive this code from eric moore and this really work, but it have a limitation that consist that VFP has limited the maximun array elements number to 65,000.
This mean that i cant download a file biger than 65,000 bytes, some alternative solution.
Thanks and Regards
>So, assuming a working URL, you can gte a binary file as a byte array like >this:
>
>
>strURL = "
http://SomeDomain.com/somebinaryfile.dbf"
>
>* Retrieve the file as a byte array.
>
>laFileArray = THISFORM.Inet.OpenURL(strURL, 1)
>
>lcFileString = ""
>FOR i = 1 TO ALEN(laFileArray)
> lcFileString = lcFileString + CHR(laFileArray[i])
>ENDFOR
>
>STRTOFILE(lcFileString, "c:\SomeBinaryFile.dbf")
>
>
>The variable that the function returns when you pass in 1 as the second parameter is actually a VFP array. Its values are numeric, and all oyuhave to do is translate them into their characters with CHR().