Довольно часто нужны обработки, в которых нужно скачать по ссылке прайс/фото/другой файл. Бывает что эти файлы упакованы архиватором rar.

Скачиваем rar портабл тут и распаковываем куда-нибудь на компьютере, где установлен сервер 1с.

&НаСервере
Процедура загрузитьДанныеПоФТПНаСервере()
//указываем ссылки массивФото=новый массив; массивФото.Добавить("http://имя_сайта.ру/deno_foto/braslety/braslety.rar"); массивФото.Добавить("http://имя_сайта.ру/deno_foto/chasy_tsepi/chasy_tsepi.rar"); массивФото.Добавить("http://имя_сайта.ру/deno_foto/kolco/kolco.rar"); массивФото.Добавить("http://имя_сайта.ру/deno_foto/kolje/kolje.rar"); массивФото.Добавить("http://имя_сайта.ру/deno_foto/kulon_brosh/kulon_brosh.rar"); массивФото.Добавить("http://имя_сайта.ру/deno_foto/sergi/sergi.rar"); массивФото.Добавить("http://files/имя_сайта.ру/deno_foto/solomon/solomon.rar"); массивФото.Добавить("http://имя_сайта.ру/deno_foto/judaika_galvanika/judaika_galvanika.rar");
//вырезаем имя файла для каждого ссылка из массивФото цикл стр=ссылка; Пока Найти(Стр,"/")>0 Цикл Стр = Прав(Стр,СтрДлина(Стр) - Найти(Стр,"/")); КонецЦикла;
попытка
// копируем файл по ссылке КопироватьФайл (Ссылка, "C:\Прайс\Дено\фото\"+стр); // распаковываем ЗапуститьПриложение(""""+ "c:\Прайс\wrar560ru\RAR.exe"+""""+" x "+"C:\Прайс\Дено\фото\"+стр+" *.* "+"C:\Прайс\Дено\фото\"); // путь относительно сервера до rar.exe [путь до архива] [куда распаковать] исключение сообщить(ОписаниеОшибки()); конецПопытки; КонецЦикла; КонецПроцедуры &НаКлиенте Процедура загрузитьДанныеПоФТП(Команда) загрузитьДанныеПоФТПНаСервере(); КонецПроцедуры