1. Скачиваем файл toxml.ert
[Ссылки доступны только зарегистрированным пользователям
. Регистрируйся тут...] и кладем его в папку ExtForms
2. Глобальный модуль: Процедура ПриНачалеРаботыСистемы()
Ремаркуем это:
//Если юПроверитьРегНомер() = 0 Тогда
// СтатусВозврата(0);
// Возврат;
//КонецЕсли;
3. Обработки - ВыгрузкаЭСЧФ:
Ремаркуем все, в конце добавляем
Функция ПроверкаОбновлений()
//Перем Ответ;
//Попытка
// HTTPАдрес = АдресСайтаОбновлений+"expcheckxml.asp?id="+СокрЛП( Константа.УННОрганизации)+"®num="+СокрЛП(Конста нта.РегНомер);
// HTTPСоединение.Получить(HTTPАдрес, Ответ, 2);//url, приемник, тип приемника (1 - путь к файлу, куда записать полученные данные)
//Исключение
// Сообщить(HTTPСоединение.СтрокаСостоянияОтвета);
// Возврат 0;
//КонецПопытки;
//Если ПустоеЗначение(Ответ) = 1 Тогда
// Возврат 0;
//КонецЕсли;
//Если Ответ = "NA" Тогда
// Сообщить("Выгрузка ЭСЧФ доступна в онлайн режиме для пользователей, подписанных на обновление!","!");
// Сообщить("По вопросам подписки обращайтесь по тел. 210-59-03", "i");
// Возврат -1;
//КонецЕсли;
//
//КомпонентаXML = КаталогИБ() + "Extforms\"+Прав(СтрЗаменить(Ответ,"tx","er"), 9);
//Попытка
// HTTPСоединение.Получить(Ответ, КомпонентаXML, 1);//url, приемник, тип приемника (1 - путь к файлу, куда записать полученные данные)
//Исключение
// Сообщить(HTTPСоединение.СтрокаСостоянияОтвета);
// Возврат 0;
//КонецПопытки;
//
//Если ФС.СуществуетФайл(КомпонентаXML) = 0 Тогда
// Возврат 0;
//КонецЕсли;
Компонента = "toxml.ert";
КомпонентаXML = КаталогИБ() + "Extforms\"+Компонента;
Если ФС.СуществуетФайл(КомпонентаXML) = 0 Тогда
Возврат 0;
КонецЕсли;
Возврат 1;
КонецФункции
4. Процедура Выполнить()
Ремаркуем в конце
//Если ФС.СуществуетФайл(КомпонентаXML) = 1 Тогда
//ФС.УдалитьФайл(КомпонентаXML);
//КонецЕсли;
Теперь в указанной папке будет создаваться файл xml-формата ЭСЧФ. На портал не заливал, потому как снова не работает.