Я написал небольшой VBScript, который загружает файлы с веб-сервера. Я понимаю, почему это беспокоит ОС, но я вошел в систему как администратор и хочу запустить скрипт.
Точная ошибка, которую я получаю,
Error: Permission denied
Code: 800A0046
Как я могу сказать Windows, чтобы позволить администратору делать то, что он хочет?
РЕДАКТИРОВАТЬ
Я поставил ниже скрипт на случай, если это поможет. Пробовал на Windows XP раньше, он не работал без проблем. Мой домашний Windows 8 не позволяет, хотя.
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