Спасибо
Я хотел развить свой вопрос
'Код состояния HTTP WWW страницы
'подключаем библиотеку Microsoft XML, v6.0
Страница = "
http://www.rambler.ru/"
Dim obj As MSXML2.ServerXMLHTTP
Set obj = New MSXML2.ServerXMLHTTP 'создаём объект с именем ...
obj.Open "GET", Страница 'куда и как посылать запрос
obj.send 'команда отправлять запрос
Код_состояния_HTTP_WWW_страницы = obj.Status '2xx Success - Успешно
Ну получил я в переменную Код_состояния_HTTP_WWW_страницы = 200 ОК
И что мне это даёт???, что где то там далеко есть такая страница???
То есть если бы было
Страница = "Страница" то я бы не получил Код_состояния_HTTP_WWW_страницы = 200 ОК
И что мне это даёт???
В то же время я читал, что
XMLHTTP.readyState <> 4
предпочтительней
IE.readyState <> 4
Так я вот не пойму как тогда писать скрипт
Dim Страница As String
Страница = "
http://mail.ru/"
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.navigate (Страница)
Do While XMLHTTP.readyState <> 4
DoEvents
Loop
IE.Visible = True
Так что надо ещё добавить, чтобы на строке
Do While XMLHTTP.readyState <> 4
Не было ошибки?
?
Подскажите пожалуйста