Ожидание пакета данных WinSock

[Sun07]

Скажите пожалуйста, отправляю пакет данных через сокет. После wsk1.SendData MyData надо программу ввести в ожидание данных, скажем 10 сек. Как это лучше организовать?

[vvs_adm]

Может лучше, что б клиент тогда уж прислал ответ? Или ты имеешь ввиду таймаут, по истечение которого рвать связь?

P.S.: а вторую тему лучше удали, пока ее не увидали

[Sun07]

да, таймаут

[vvs_adm]

Ну таймаут логично выставлять через таймер. Что-то типа (в зависимости от нужд) :

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

'==========================
    wsServer.SendData "test"
    tmrTimeOut.Enabled = True
'==========================
Private Sub wsServer_DataArrival
    ..
    tmrTimeOut.Enabled = False
End Sub
'==========================
Private Sub tmrTimeOut_Timer
    ..
    wsServer.Close
End Sub
'==========================