0
While Not code_Download = 0 'code_Download = 0 --> CORRECT
If delay < 30000 Then
delay = delay + 2000
Else
MsgBox "Delay too long"
CREATEtemp_fileXML = False
Exit Function
End If
Set IE = New InternetExplorerMedium ' <<<<<<<<<
IE.Navigate wURL
Sleep delay
IE.Quit
code_Download = URLDownloadToFile(0, wURL, temp_fileXML, 0, 0)
所以我設置了一個新的InternetExplorermedium每當我通過循環。沒有這個,我得到了一個不被認可的界面的錯誤。我想知道如果我可以和如何摧毀以前的指針,或者如果這是「不是那麼糟糕」的做法。 謝謝VBA是我的對象刪除,如果我把它設置爲一個新的