0
我正在使用XMLHTTP一個VBA代碼,我有我無法弄清楚它的原因的問題..VBA吃內存..不能明確資源
的問題是:
而循環運行它不斷消耗的內存越來越多,所以我試圖找到導致此問題的一部分,我想出了這個部分:
For i = 1 To 100
url = "https://www.google.co.in/search?q=" & "hello" & "&rnd=" & WorksheetFunction.RandBetween(1, 10000)
Set XMLHTTP = CreateObject("MSXML2.serverXMLHTTP")
XMLHTTP.Open "GET", url, False
XMLHTTP.setRequestHeader "Content-Type", "text/xml"
XMLHTTP.setRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 6.1; rv:25.0) Gecko/20100101 Firefox/25.0"
XMLHTTP.send
Set html = CreateObject("htmlfile")
html.body.innerHTML = XMLHTTP.responsetext
DoEvents
Next i
我用盡了一切我能想到的(試圖將對象設置爲無 - 內部&以外的循環,並試圖從'for循環'保存excel文件),但我無法解決問題。 我嘗試了以下3行,他們是不固定任何東西:
XMLHTTP.abort
Set XMLHTTP = Nothing
Set html = Nothing
注1:即使這11行的代碼將被執行的唯一代碼中發生的問題!
注2:程序完成後,即使內存不會被釋放!
請指教。謝謝