J'ai écrit un petit vbscript qui télécharge des fichiers depuis un serveur web. Je comprends pourquoi cela inquiète l'OS mais je suis connecté en tant qu'administrateur et je veux que le script s'exécute.
L'erreur exacte que je reçois est
Error: Permission denied
Code: 800A0046
Comment puis-je dire à Windows de laisser l'administrateur faire ce qu'il veut ?
EDIT
J'ai mis le téléchargement script ci-dessous au cas où cela aiderait. Je l'ai essayé sur un Windows XP plus tôt, il a fonctionné sans problème. Mon Windows 8 à la maison ne le permet pas cependant.
HTTPDownload "http://site.com/fileA.dll", "C:\"
HTTPDownload "http://site.com/fileB.exe", "C:\"
Sub HTTPDownload( myURL, myPath )
Dim i, objFile, objFSO, objHTTP, strFile, strMsg
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set objFSO = CreateObject( "Scripting.FileSystemObject" )
If objFSO.FolderExists( myPath ) Then
strFile = objFSO.BuildPath( myPath, Mid( myURL, InStrRev( myURL, "/" ) + 1 ) )
ElseIf objFSO.FolderExists( Left( myPath, InStrRev( myPath, "\" ) - 1 ) ) Then
strFile = myPath
Else
Exit Sub
End If
Set objFile = objFSO.OpenTextFile( strFile, ForWriting, True )
Set objHTTP = CreateObject( "WinHttp.WinHttpRequest.5.1" )
objHTTP.Open "GET", myURL, False
objHTTP.Send
For i = 1 To LenB( objHTTP.ResponseBody )
objFile.Write Chr( AscB( MidB( objHTTP.ResponseBody, i, 1 ) ) )
Next
objFile.Close( )
End Sub