foxpro - 使用 FoxPro 下载文件 (HTTP)

Question

今天有人向我寻求有关 FoxPro 问题的帮助，了解如何通过 HTTP 下载文件。

我发现了两件事:一个是付费的 ActiveX，另一个是 other one需要 libcurl。

有没有一种方法可以做到这一点，而不需要任何额外的东西(VFP 8)，比如Java中的HttpURLConnection？例如，通过使用 Microsoft.XMLHTTP

Answer 1

两个有效的代码片段，不需要额外的文件/dll/flls/等。

Local loRequest, lcUrl, lcFilename

lcUrl = "http://example.com/foo.zip"
lcFilename = "C:\Temp\PSV.zip"

loRequest = Createobject('MsXml2.XmlHttp')
loRequest.Open("GET",lcUrl,.F.)
loRequest.Send()
StrToFile(loRequest.ResponseBody,lcFilename)

和

lox = CREATEOBJECT("inetctls.inet")
lcSuff = lox.OpenURL("http://whatever.co.uk/suff.htm")
STRTOFILE(lcStuff, "c:\data\myfile.htm")

(取自 here )