Получение данных по запросу

[InTacto]

Вы забыли вызвать команду send.

IF NOT ISCLEAR(XMLHTTP) THEN
  CLEAR(XMLHTTP);
CREATE(XMLHTTP);

XMLHTTP.open('GET', url , FALSE);  // последний параметр отвечает за синхронный или асинхронный режим.
XMLHTTP.send();

IF XMLHTTP.status<>200 THEN
  BEGIN
    ERROR(STRSUBSTNO('Получение файла %1. '+
                  'Ошибка HTTP %2: %3', url ,XMLHTTP.status,
                             COPYSTR(XMLHTTP.statusText,1,230)))
  END;