УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

		Форум АНТИЧАТ > БЕЗОПАСНОСТЬ И УЯЗВИМОСТИ > Песочница
Как сделать фейковый сервер ICQ?

Опции темы

Поиск в этой теме

Опции просмотра

26.12.2010, 13:26

Kn[1]Fe^^

Guest

Сообщений: n/a

Провел на форуме:
6242

Репутация: 0

Мои дорогие, можно спросить у вас как сделать фейковый сервер ICQ? Желательно Delphi.

26.12.2010, 13:35

alkos

Участник форума

Регистрация: 28.03.2007

Сообщений: 252

Провел на форуме:
469020

Репутация: 63

Отправить сообщение для alkos с помощью ICQ

Цитата:

Сообщение от Kn[1

Fe^^"]
Kn[1]Fe^^ said:
можно спросить у вас как сделать фейковый сервер ICQ?

Можно

Цитата:

Сообщение от Kn[1

Fe^^"]
Kn[1]Fe^^ said:
Желательно Delphi.

Берёшь делфи и пишешь. Документацию протокола OSCAR можешь почитать ЗДЕСЬ. Кроме того изучай исходники от карася (где взять уже писали). Для конкретных вопросов по коду есть соответствующий раздел "Программирование".

26.12.2010, 13:37

d1v

Новичок

Регистрация: 21.02.2009

Сообщений: 3

Провел на форуме:
58401

Репутация: 0

http://upwap.ru/1000479

26.12.2010, 14:28

Unknown

Guest

Сообщений: n/a

Провел на форуме:
124946

Репутация: 19

для танкистов http://www.xaker.name/forvb/showthread.php?t=9262 там все понятно расписано..скобочки,точечк� �,запяточечки влепиш и малюй на делфе

27.12.2010, 05:35

Unknown

Guest

Сообщений: n/a

Провел на форуме:
124946

Репутация: 19

пример на vb6 (с использованием винсокса)

Код:

Code:
Dim Data As String
Private Sub Form_load() 'загрузка формы
Winsock1.RemotePort = 5190 'устанавливаем порт 5190
Winsock1.LocalPort = 5190 'устанавливаем локальный порт 
Winsock1.Listen 'начинаем слушать порт
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) 'если нам чтото пришло
Winsock1.GetData Data 'то записываем это в переменную
MsgBox Data 'выводим на экран сообшение с тем что получили
End Sub

в клиенте вместо сеpвера авторизации ставь 127.0.0.1 или IP (если IP не под NAT'ом)

« Предыдущая тема | Следующая тема »

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

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