1c COM

objHTTP = ПолучитьCOMОбъект("","Microsoft.XMLHTTP");
ЗаписьЖурналаРегистрации("Завантаження файлу",УровеньЖурналаРегистрации.Информация, , ,"Сервер " + СокрЛП(Сервер));
Попытка
objHTTP.open("GET", СокрЛП(Сервер) ,0,СокрЛП(Логін),СокрЛП(Пароль));
исключение
ЗаписьЖурналаРегистрации("Помилка",УровеньЖурналаРегистрации.Ошибка, , ,ОписаниеОшибки());
КонецПопытки;	
objHTTP.send();
Если objHTTP.readyState = 4 Тогда
Строка = toBase64(objHTTP.responseBody);
Двоичные = Base64Значение(Строка);
если НЕ ПустаяСтрока(Куди) тогда
Двоичные.Записать(СокрЛП(Куди));
Ф1 = Новый Файл(СокрЛП(Куди));
ЗаписьЖурналаРегистрации("Завантаження файлу закінчено",УровеньЖурналаРегистрации.Информация, , ,"Сервер " + СокрЛП(Сервер));
//Состояние("Готово");
Возврат Ф1;
<span style='cursor: pointer; color:red' Onclick="window.open('http://www.1c-pro.ru/wiki/index.php/иначе')">			иначе	</span>
Двоичные.Записать(СокрЛП(Константы.КаталогЗакачки.Получить()+"\"+"tmp"+Формат(ТекущаяДата(),"ДФ=yyyy_MM_dd_hh_mm_ss"+".tmp")));
Ф1 = Новый Файл(СокрЛП(Константы.КаталогЗакачки.Получить()+"\"+"tmp"+Формат(ТекущаяДата(),"ДФ=yyyy_MM_dd_hh_mm_ss"+".tmp")));
ЗаписьЖурналаРегистрации("Завантаження файлу закінчено",УровеньЖурналаРегистрации.Информация, , ,"Сервер " + СокрЛП(Сервер));
//Состояние("Готово");
Возврат Ф1;
КонецЕсли;	
иначе
ЗаписьЖурналаРегистрации("Завантаження файлу невдале",УровеньЖурналаРегистрации.Ошибка, , ,"Сервер " + СокрЛП(Сервер));
Ф1 = Неопределено;
Возврат Ф1;
КонецЕсли;