Просмотр полной версии : Как сделать фейковый сервер ICQ?
Kn[1]Fe^^
26.12.2010, 13:26
Мои дорогие, можно спросить у вас как сделать фейковый сервер ICQ? Желательно Delphi.
Fe^^"]
Kn[1]Fe^^ said:
можно спросить у вас как сделать фейковый сервер ICQ?
Можно
Fe^^"]
Kn[1]Fe^^ said:
Желательно Delphi.
Берёшь делфи и пишешь. Документацию протокола OSCAR можешь почитать ЗДЕСЬ (http://oscar.asechka.ru/). Кроме того изучай исходники от карася (где взять уже писали). Для конкретных вопросов по коду есть соответствующий раздел "Программирование".
для танкистов http://www.xaker.name/forvb/showthread.php?t=9262 там все понятно расписано..скобочки,точечк ,запяточечки влепиш и малюй на делфе
пример на 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'ом)
vBulletin® v3.8.14, Copyright ©2000-2026, vBulletin Solutions, Inc. Перевод: zCarot