Vba ADODB流设置为“无”时未清除缓存

希望有人能帮忙。我试图通过URL链接下载MS Access数据库和Excel文件，但如果文件更新，我的下载脚本不会更新流。当变量设置为nothing时，缓存未清除。下次我尝试运行代码时，将下载原始文件而不是更新的文件

我曾尝试在多个地方添加“set to nothing”，但我认为我的问题是，正如我在这里的一篇类似帖子中发现的，我对对象变量的声明并没有更具体。我对VBA的这方面不是很有经验

Dim sFo as string
Dim oStrm As Object
Dim HttpReq As Object
Dim nwLBUDir As String

sFo = "http://10.38.111.342/Shared_Docs//Docs/Locfile.mdb"
nwLBUDir = Application.CurrentProject.Path

Set HttpReq = CreateObject("microsoft.XMLHTTP")
    HttpReq.Open "GET", sFo, False
    HttpReq.send

    sFo = HttpReq.responseBody
    If HttpReq.Status = 200 Then
        Set oStrm = CreateObject("ADODB.Stream")
        oStrm.Open
        oStrm.Type = 1
        oStrm.Write HttpReq.responseBody
        oStrm.SaveToFile nwLBUDir & "\" & "Locfile.mdb", 2
        oStrm.Close
    End If
    Set oStrm = Nothing

---

如果有人能指出我没能将变量设置为零，我将不胜感激。提前谢谢你。：）

嗯，我一直在玩它更多，它似乎是某种放缓我的系统。如果我等待几分钟，文件将正确更新。我正在一个非常新的系统上运行Win 10…如何检查内存是否已正确清除，以及需要多长时间（如果可能的话）？您是否尝试过使用CreateObject（“microsoft.XMLHTTP”）

。。。以

结束？感谢您的回复。我还没试过。你有没有一个例子，我可以如何使这项工作或一些指示链接？