Как установить таймаут при получении информации по http

[jasper]

Здаруствуйте уважаемый All
Такая проблема
Нужно получать данные по http
пример джоба

static void testWeight(Args _args)
{
    COM         objXHTTP;
    str         s;
    str         _url = "http://cbr.ru"; //Для примера рабочий
//    str         _url =     "http://192.168.7.77"; //Нет http пингуется
//    str         _url =     "http://192.168.15.200/GetWeight"; //Не пингуется
    ;

    objXHTTP = new COM("MSXML2.XMLHTTP");
    objXHTTP.Open("GET", _url, false);//true асинхронный
    objXHTTP.setRequestHeader("If-Modified-Since", "Sat, 1 Jan 2000 00:00:00 GMT");//отключаем кэш это важно
    objXHTTP.send();
    If(objXHTTP.readyState() == 3 || objXHTTP.readyState() == 4) //4 - Complete; 3 - Some data has been received.
    {
        info('ok');
    }
    else
    {
        error("Сервер недоступен");
    }

    s = objXHTTP.responseText();
    info(s);
}

Но заказчика не устраивает время задержки если сервер не доступен!
пауза происходит при срабатывании objXHTTP.send();
можно изменить код использовать асинхронный доступ

    objXHTTP.Open("GET", _url, true);//true асинхронный
    objXHTTP.setRequestHeader("If-Modified-Since", "Sat, 1 Jan 2000 00:00:00 GMT");//отключаем кэш это важно
    objXHTTP.send();
    sleep(1000);//задержка для получения данных

Но этот код не работает: не меняется readyState, при вызове responseText происходит ошибка
Хотя JScript работает

var _url = "http://cbr.ru";
//var _url = "http://192.168.15.53/getweight"; //для проверки недоступности
var objXHTTP = new ActiveXObject("Msxml2.XMLHTTP");

    objXHTTP.Open("GET", _url, true);
    objXHTTP.setRequestHeader("If-Modified-Since", "Sat, 1 Jan 2000 00:00:00 GMT");
    objXHTTP.send(null);
    WScript.Sleep(1000);	

    if (objXHTTP.readyState == 3 || objXHTTP.readyState == 4) 
    {
       WScript.Echo("Done");
    }
    else
    {
       WScript.Echo("Server Недоступен " + objXHTTP.readyState);
    }	

    s = objXHTTP.responseText;

    WScript.Echo(s);

Проверка состояния objXHTTP.readyState в цикле в ax тоже ничего не дает, состояние остается равным 1
ЗЫ Изменение в реестре параметров KeepAliveTimeout и ServerInfoTimeout ничего не дало

[Lucky13]

Цитата:

Сообщение от jasper

Но этот код не работает: не меняется readyState, при вызове responseText происходит ошибка

Проблема в sleep(1000). Не знаю в чем причина, но мне не удалось заставить такой код работать в Ax. Сделал таймер на форме через setTimeOut в котором проверяю значение readystate. Так все работает.

[jasper]

Цитата:

Сообщение от Lucky13

Проблема в sleep(1000).

Такой код, без sleep тоже не работает

t = timeNow();
    while(timeNow() - t <= 60)
    {
        if(objXHTTP.readyState() != 1)
        {
            info('1');
            break;
        }
    }

Таймер работает.
Что то в этом неправильное.

[Lucky13]

Цитата:

Сообщение от jasper

Такой код, без sleep тоже не работает

t = timeNow();
    while(timeNow() - t <= 60)
    {
        if(objXHTTP.readyState() != 1)
        {
            info('1');
            break;
        }
    }

Таймер работает.
Что то в этом неправильное.

А где вызывается send()? Нужно чтобы readystate проверялся не в цикле, а в отдельном потоке, не в том в котором вызван send. В аксапте такое можно реализовать через setTimeOut

[jasper]

Спасибо за помощь.
непонятно почему работает только в отдельном потоке но это можно использовать.