| Вопрос: Как организовать ожидание ответа | Добавлено: 10.04.05 21:30 |
Автор вопроса:  PeterS
|
|
Приветствую всех!
Допустип идёт выполнение программы: Sub Pro() ......... WinSock.SendData "sendrequest" ' Посылаем запрос Здесь теперь необходимо дождаться ответа. И в зависимости от него выполнить то или иное действие. Select Case HowMany Case 0 ' Нет ответа Case 1 ' делаем то что нужно Case 2 ' тоже делаем то что нужно End Select End Sub В ниже следующем коде имеем: WinSock_DataArrival(...) WinSock.GetData strData Select Case strData Case "sendrequest" if var1 = 1 Then WinSock.SendData "1" Else WinSock.SendData "2" End if Case "1" HowMany = 1 Case "2" HowMany = 2 End Select End Sub Вот так! Это чисто логически и примерно что нужно (ест. не работает). Пожалуйста, поделитесь рабочими вариантами! |
| Ответы | Всего ответов: 0 |
Страница: