Подскажите про WinSock, pls

[ANDLL]

Я делаю примерно следующее:

Код: Выделить всё

    If bind(nSocket, nAddr, Len(nAddr)) Then MsgBox "Can't bind socket", vbCritical: End
    If listen(nSocket,  &H7FFFFFFF) Then MsgBox "Can't listen socket", vbCritical: End
    If WSAAsyncSelect(nSocket, hwnd, WINSOCKMSG, FD_ACCEPT Or FD_CONNECT Or FD_READ Or FD_WRITE Or FD_CLOSE) Then MsgBox "The WSAAsyncSelect function return invalid value", vbCritical: End


Как теперь отловить то событие, которое в OCX обозначалось как ConnectionRequest?

[kirrun]

Я, честно говоря, не понял что ты сделал....

[GSerg]

Ты, это...
За такой код надо отрывать... Всё надо отрывать
В каждой точке аварийного выхода должно стоять корректное уничтожение сокета. Как минимум

А сообщение ты будешь получать то, которое сам захотел, а именно WINSOCKMSG (интересно, что это ). wParam = SOCKET, LOWORD(lParam) = EVENT_ID, HIWORD(lParam) = ERROR_ID. RTFMSDN!

[ANDLL]

Так нет сообщения WINSOCKMSG. Когда кто-то пытается подключится вылазит сообщение(у того, кто подключается) Connecntion was forceful rejected. Такое сообщение обычно появляется, если пытаться подключится к порты, который не прослушивается.

[tyomitch]

Так нет сообщения WINSOCKMSG. Когда кто-то пытается подключится вылазит сообщение(у того, кто подключается) Connecntion was forceful rejected. Такое сообщение обычно появляется, если пытаться подключится к порты, который не прослушивается.

Или когда кое-кто забил на вызовы accept при попытке подключения.


У тебя WINSOCKMSG вообще обрабатывается как-то или для чего написано??

[ANDLL]

Обрабатывается. Я же говорю, что он вообще не посылается при попытке подключения.

[tyomitch]

Обрабатывается. Я же говорю, что он вообще не посылается при попытке подключения.

Уверен?

http://www.killervb.com/functionJunctio ... inSock.Cls смотрел? У них всё посылается.