Имя: Пароль:
1C
1С v8
Как можно перебрать файлы в каталоге и переместить их в другое место
0 Xelga
 
11.04.12
13:02
В каталог будут закидываться файлы, которые нужно будет в виде документов подгружать в УТ. Обработка будет запускаться с определенной периодичностью. Нужно указать два каталога, из одного будет брать файлы, по очереди их обрабатывать и после обработки их надо перемещать в резервный каталог. Какие функции есть для работы с файлами? может какую-нибудь ссылочку на пример?
1 Wobland
 
11.04.12
13:03
Процедура КнопкаВыполнитьНажатие(Кнопка)
   ГСЧ=Новый ГенераторСлучайныхЧисел;
   Файлы=НайтиФайлы(Путь, "*.jpg");
   ОбщееКоличество=Файлы.Количество();
   
   ПроцессорКомпоновки=Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
   ПроцессорКомпоновки.ОтображатьПроцентВывода=Истина;
   ЭлементКомпоновки=Новый ЭлементРезультатаКомпоновкиДанных;
   ПроцессорКомпоновки.НачатьВывод();
   Для й=0 По ОбщееКоличество-1 Цикл
       НовоеИмя=Путь+"\"+Формат(ГСЧ.СлучайноеЧисло(0, 99999999), "ЧЦ=8; ЧВН=; ЧГ=0")+".jpg";
       ф=Новый Файл(НовоеИмя);
       Если ф.Существует() Тогда
           й=й-1;
           Продолжить;
       КонецЕсли;
       ПереместитьФайл(Файлы[й].ПолноеИмя, НовоеИмя);
       ЭлементКомпоновки.ПроцентВывода=100*й/ОбщееКоличество;
       ПроцессорКомпоновки.ВывестиЭлемент(ЭлементКомпоновки);
   КонецЦикла;
   ПроцессорКомпоновки.ЗакончитьВывод();
КонецПроцедуры
2 butterbean
 
11.04.12
13:03
в СП все есть, даже с примерами
3 Xelga
 
11.04.12
13:52
(2) Что такое СП? только не кидайтесь в меня тухлыми яйцами))))))
4 Euguln
 
11.04.12
13:53
(3) Синтаксис Помощник
5 Fish
 
11.04.12
13:53
(3) Это синтакс-помощник. Там есть раздел Работа с файлами. Все команды с примерами.
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан