Имя: Пароль:
1C
1С v8
(8.2) как последовательно открыть несколько .xls из указанной папки?
0 vechiy
 
25.07.14
18:24
Есть сетевая папочка, в ней лежат 0 или больше .xls
Подскажите, как, не зная имя эксельки, почитать её, удалить и перейти к следующей?
1 Enders
 
25.07.14
18:27
Файлы=НайтиФайлы("Ваш путь", "*.xls");
Для кадого файл из Файлы Цикл
УдалитьФайлы(файл.ПолноеИмя);
КонецЦикла
;
2 vechiy
 
25.07.14
18:32
отлично, попробую
а с .xlsx все ещё никак работать?
3 mehfk
 
25.07.14
18:34
(2) Будет работать, если доплатить автору кода в (1) за адаптацию. Потянешь по деньгам?
4 vechiy
 
25.07.14
18:36
не, сэкономил вроде уже)
5 ДенисЧ
 
25.07.14
18:37
Файлы=НайтиФайлы("Ваш путь", "*.xlsx");
Для кадого файл из Файлы Цикл
  ПочитатьФайлДаСвятисьЕгоИмя(файл.ПолноеИмя);
УдалитьФайлы(файл.ПолноеИмя);
КонецЦикла
6 Enders
 
25.07.14
18:38
(4) Лучше я промолчу на чём ;)
7 vechiy
 
25.07.14
18:59
(6)
наука знает много гитик)
мерси!