我需要从网站下载最新文件,而不使用wget或任何外部实用程序。我在堆栈溢出本身发现了以下vbscript(不知道链接,因为我已经清除了缓存和历史记录)
' Set your settings
strFileURL = "http://somewebsitehere.com/somefile"
strHDLocation = "D:\somepath\"
' Fetch the file
Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")
objXMLHTTP.open "GET", strFileURL, false
objXMLHTTP.send()
If objXMLHTTP.Status = 200 Then
Set objADOStream = CreateObject("ADODB.Stream")
objADOStream.Open
objADOStream.Type = 1 'adTypeBinary
objADOStream.Write objXMLHTTP.ResponseBody
objADOStream.Position = 0
'Set the stream position to the start
Set objFSO = Createobject("Scripting.FileSystemObject")
If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFile strHDLocation
Set objFSO = Nothing
objADOStream.SaveToFile strHDLocation
objADOStream.Close
Set objADOStream = Nothing
End if
Set objXMLHTTP = Nothing
然而,在使用此脚本后,我发现它在前几次试验中确实可以正常工作,但后来从缓存中下载了相同的文件,而不是从网上下载新文件。我从C:\ Users \ username \ AppData \ Local \ Microsoft \ Windows \ INetCache \ IE \ 0XQSU247获取相同的文件。 我需要清除INETCache,然后重新运行脚本以获取新文件。 那么应如何修改此脚本,以便从Web服务器获取最新的更新文件,而不是从缓存中获取文件。 这个问题可能很蹩脚,但我对vbscript一无所知。