"Erro: Não há armazenamento suficiente disponível para concluir esta operação."
Você verificou se realmente tem espaço em disco suficiente para o arquivo de download?
Alguém teve sucesso com o download de arquivos grandes via VBScript? Meu script está abaixo e está cometendo erro ao baixar um arquivo com mais de 1 GB. Arquivos pequenos funciona sem problemas. Preciso tentar um método diferente? A mensagem de erro que isso me dá está abaixo. Agradecemos antecipadamente por qualquer sugestão!
strFileURL = "http://10.0.0.0/File.zip"
strHDLocation = "C:\File.zip"
Set objXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP")
objXMLHTTP.open "GET", strFileURL, false
objXMLHTTP.setTimeouts 1000 * 60 * 60, 1000 * 60 * 60, 1000 * 60 * 60, 1000 * 60 * 60
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
objADOStream.SaveToFile strHDLocation
objADOStream.Close
Set objADOStream = Nothing
End if
Set objXMLHTTP = Nothing
Set objFSO = Nothing
A mensagem de erro que recebo é:
Error: Not enough storage is available to complete this operation.
Code: 8007000E
Source: msxml3.dll
"Erro: Não há armazenamento suficiente disponível para concluir esta operação."
Você verificou se realmente tem espaço em disco suficiente para o arquivo de download?
Tags vbscript