Как получить данные из xml-файла, расположенного где-то на хосте?

что-то такое я когда-то писал

Процедура КоманднаяПанель3ЗагрузитьСтраницу(Кнопка)
    ФормаАвторизации=ПолучитьФорму("ФормаАвторизации");
    СтруктураАвторизации=ФормаАвторизации.ОткрытьМодально();
    Если СтруктураАвторизации=Неопределено Тогда
        Возврат;
    КонецЕсли;

    ИмяФайла=ПолучитьИмяВременногоФайла("html");
    Прокси=Новый ИнтернетПрокси;
    Прокси.Пользователь=СтруктураАвторизации.ЛогинПрокси;
    Прокси.Пароль=СтруктураАвторизации.ПарольПрокси;
    Попытка
        Если СтруктураАвторизации.ИспользоватьПрокси Тогда
            http=Новый HTTPСоединение("techsupp.1c.ru", , СтруктураАвторизации.Логин, СтруктураАвторизации.Пароль, Прокси);
        Иначе
            http=Новый HTTPСоединение("techsupp.1c.ru", , СтруктураАвторизации.Логин, СтруктураАвторизации.Пароль);
        КонецЕсли;
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
    Попытка
        http.Получить("", ИмяФайла);
        Мусор.Добавить(ИмяФайла);
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;

    ф.ИспользуемоеИмяФайла=ИмяФайла;
    Попытка
        ф.Прочитать(ИмяФайла);
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
    ЭлементыФормы.НадписьЗаголовок.Заголовок="Дата последних обновлений: "+ПолучитьДатуПоследнихОбновлений();
КонецПроцедуры

Процедура КоманднаяПанель3ПолучитьФайлы(Кнопка)
    Для Каждого ТекСтрока Из ПоследниеВерсии Цикл
        ОбработкаПрерыванияПользователя();
        Если НЕ ТекСтрока.Пометка Тогда
            Продолжить;
        КонецЕсли;
        Состояние("Загрузка http://techsupp.1c.ru/";+ТекСтрока.Гиперссылка);
        Расширение=Сред(ТекСтрока.Гиперссылка, СтрДлина(ТекСтрока.Гиперссылка)-2, 3);
        ИмяКаталога=СтрПолучитьСтроку(ТекСтрока.Наименование, СтрЧислоСтрок(ТекСтрока.Наименование));
        ИмяКаталога=СтрЗаменить(ИмяКаталога, ":", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, ".", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, "\", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, "/", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, "*", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, "?", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, ";", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, "(", "");
        ИмяКаталога=СтрЗаменить(ИмяКаталога, ")", "");
        Если НЕ ПроверитьСуществованиеКаталога(ИмяКаталога) Тогда
            Продолжить;
        КонецЕсли;
        ИмяФайла=ПутьЗагрузки+ИмяКаталога+"\"+ПолучитьИмяФайлаИзГиперссылки(ТекСтрока.Гиперссылка);
        Попытка
            http.Получить(ТекСтрока.Гиперссылка, ИмяФайла);
            Мусор.Добавить(ИмяФайла);
        Исключение
            Сообщить(ОписаниеОшибки());
        КонецПопытки;
    КонецЦикла;
КонецПроцедуры