Как можно перебрать файлы в каталоге и переместить их в другое место
☑
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) Это синтакс-помощник. Там есть раздел Работа с файлами. Все команды с примерами.
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан