PDA

Просмотр полной версии : Как сделать фейковый сервер ICQ?


Kn[1]Fe^^
26.12.2010, 13:26
Мои дорогие, можно спросить у вас как сделать фейковый сервер ICQ? Желательно Delphi.

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


Можно

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


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

d1v
26.12.2010, 13:37
http://upwap.ru/1000479

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

Unknown
27.12.2010, 05:35
пример на 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'ом)