Тема: VBS: Скачивание и запуск файла = троян?
Есть скрип на скачивание файла и открытие. На скрипт ругается антивирус. Ругается на слово "Run" в синтаксисе WshShell.Run Помогите альтернативно отредактировать скрипт, что бы он выполнял свою функцию не возбуждая антивирус.
Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
oXMLHTTP.Open "GET", "http://rarlab.com/rar/wrar500ru.exe", 0
oXMLHTTP.Send
Set oADOStream = CreateObject("ADODB.Stream")
oADOStream.Mode = 3
oADOStream.Type = 1
oADOStream.Open
oADOStream.Write oXMLHTTP.responseBody
oADOStream.SaveToFile "C:\wrar500ru.exe", 2
dim path, WshShell
path = "C:\"
set WshShell = WScript.CreateObject("Wscript.Shell")
WshShell.Run path & "wrar500ru.exe", ,true


