Если ЗагрузитьВнешнююКомпоненту(КаталогИБ()+"ExtForms\v7plus.dll")=0 Тогда
Если ЗагрузитьВнешнююКомпоненту("v7plus.dll")=0 Тогда
//глКомментарий("Не удалось обнаружить компоненту V7Plus.dll!",0,,"!");
СтатусВозврата(0);
КонецЕсли;
КонецЕсли;
Попытка
Соединение = СоздатьОбъект("Addin.V7HttpReader") ;
Исключение
//глКомментарий("Не удалось создать объект Addin.V7HttpReader!",0,,"!");
СтатусВозврата(0);
КонецПопытки;
Стр="";
Попытка
Соединение.ПолучитьКакСтроку("http://1cua.ucoz.ru/1c/url.my", Стр);
Исключение
КонецПопытки;
Список = СоздатьОбъект("СписокЗначений");
Список.ИзСтрокиСРазделителями(Стр);