Дождаться ответа от сервака!

[Smith68]

Трабл вот в чем.
Есть код

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


Form1.ws.Connect host_s, port_s
'нужно дождаться ответа от сервера и после этого передать следующее
Form1.ws.SendData "POST /newmsg?username=" & nick & "&passwd=" & passwd & "&channel=" & channel & " HTTP/1.0\n\n"


Как это сделать?

[Amed]

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

Private Sub Winsock1_Connect()
Form1.ws.SendData "POST /newmsg?username=" & nick & "&passwd=" & passwd & "&channel=" & channel & " HTTP/1.0\n\n"
End Sub

Что есть "ответ от сервера"?

[Хакер]

Smith68
Юзай тогда Microsoft Internet Transfer Control что-ли. Или изучай событие DataArrival у WinSock-a.

[Lumen]

DataArrival собственно изучать-то и не обязательно. Просто если оно произошло, то серв что-то ответил (а что конкретно - это уже надо смотреть то, что тебе сервак прислал). То есть в конечном итоге вс равно придётся изучать событие DataArrival.

[ANDLL]

Если сервер подтвердил TCP-соединение то происходит событие connect.
А DataArrival происходит только тогда, когда приходят данные. В случае http-соединения ждать DataArrival до отправки сосбтвенно http-запроса можно очень долго

[Smith68]

я тут просто пытаюсь бота для чат.ру накатать... и что-то мне подсказывает что он с винсоком рабоать нехочет... так шо если кто натыкался на инфу, которая облегчет мои страдания, прошу мне скинуть её.
Заранее благодарю

[ANDLL]

http://bbs.vbstreets.ru/viewtopic.php?p=6635656#6635656

[Smith68]

вот теперь уповаю на Microsoft Internet Transfer Control.