- Код: Выделить всё
Dim xmlA As MSXML2.XMLHTTP30
xmlA = New MSXML2.XMLHTTP30
Try
xmlA.open("POST", "http://......
xmlA.send("Request=GET,(......
Do Until (xmlA.status >= 200 And xmlA.status < 300)
Sleep(500)
Loop
Work = xmlA.responseText
Catch ex As Exception
.......
End Try
Так вот, когда у меня доходит до responseText, я получаю ошибку, что данные еще не готовы. А статус у меня >=200 и <300. Подскажите, какие ещё есть пути для проверки что данные вернулись с реквеста? И есть ли ещё какие нибудь пути для принятия данных с сервера, кроме Inet контрола.
