Ragazzi mi sapete dire perchè ottengo con lo script:
codice:
<%
Dim sSource, sDest, oHTTP, stream
sSource = "http://server1/website1/test.pdf"
sDest = "http://server1/website1/test2.pdf"
set oHTTP = CreateObject("Microsoft.XMLHTTP")
oHTTP.open "GET", sSource, False
oHTTP.send
const adTypeBinary = 1
const adSaveCreateOverwrite = 2
const adModeReadWrite = 3
set stream = createobject("adodb.stream")
stream.type = adTypeBinary
stream.mode = adModeReadWrite
stream.open
stream.write oHTTP.responseBody
stream.savetofile sDest, adSaveCreateOverwrite
stream.close
set oHTTP = nothing
set stream = nothing
%>
il seguente errore?
codice:
ADODB.Stream error '800a0bbc'
Write to file failed.
/public/prova.asp, line 48
La directory in cui salvo il file ha i permessi di scrittura.