Имя: Пароль:
1C
1С v8
Не получается прочитать заголовок ответа веб-сервера
0 recommend
 
22.09.13
11:22
Набо проверить есть ли в интернете страница по заданному адресу
Делаю так:

WinHttp = Новый COMОбъект("MSXML2.XMLHTTP");
WinHttp.Open("POST", "http://fcntr.ru/",0);
WinHttp.Send();
Сообщить( WinHttp.status() );    
Сообщить( WinHttp.readyState() );


Только статус всегда почемуто оказывается 200
вне завитимости от того есть ли там страница или установлен 301 редирект.
Подксажите, если кто сталкивался с этой проблемой.
1 recommend
 
22.09.13
12:59
Сам разобрался
если кому интересно:

Скрипт=Новый COMОбъект("MSScriptControl.ScriptControl");
Скрипт.language="javascript";

WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");

Скрипт.AddObject("WinHttp",WinHttp);
Скрипт.Eval("WinHttp.Option(6)=false");
    
WinHttp.Open("POST", сайт,0);
WinHttp.Send();                
    
Сообщить( WinHttp.status() );    
Сообщить( WinHttp.getAllResponseHeaders() );