Дерево файлов #9581

как построить дерево файлов с каталогами средствами 1С?

ФС.ВыбратьФайл

Так он получит окошко для выбора файла, а не картинку в виде "дерева". Используя ФС.НайтиПервыйФайл, ФС.НайтиСледующийФайл и УстТекКаталог ты сможешь извернуться и получить то что ты хочешь. Вопрос не в этом. Зачем? Вот в чём вопрос.

В окошке для выбора файла будет картинка в виде "дерева"...

Нет. Нужно вывести список каталогов с вложенными в них файлами. Причём в каталогах могут быть подкаталоги с файлами. Нужен алгоритм. (Потом эти файлы будут обрабатываться, но это уже другая тема.)

Ох, ну на тебе алгоритм 1. Определяешь текущий каталог базы данных 2. перебераешь файлы в нём 3. определяшь список папок в этом каталоге 4. назначаешь по очереди эти папки как текущие каталоги 5. удаляешь эту папку из списка папок 6. возвращаешься к 2. делаешь до тех пор, пока список папок во всех текущих каталога не будет пустым

Есть куча файлов *.xls (около сотни) разложенных по каталогам. Нужно из них слить инфу в один файл (или справочни). Причём имя каталога тоже несёт определённую информацию.

И что? В всё написано. Или ты хочешь чтобы тебе код написали?

...

А можно ли это сделать по типу рекурсии? Если можно, готовый пример можете дать?

предыдущий вопрос к Diterу

А можно я отвечу?

Давай, разрешаю

А почему нет? :) Конечно.

Перефразируя одно известное выражение, скажу так:

Спасибо ..., но мне уже чё-то расхотелось ...

Привожу свой код: Он проходит только одну ветку каталога до конца. Что нужно добавить, чтобы проходить все ветви?

При рекурсивном вызове процедуры не сохраняется значение текущего каталога.

При всём моём уважении ..., Мдя ...

Ты вначале просканируй весь каталог базы и собери в список все папки, а потом проходи по списку и назначай их текущими каталогими

Я это понимаю. Пробовал сохранять тек. каталог, а потом восстанавливать. Толи я что-то не так делаю, толи рекурсия в данном случае вообще не возможна...

Ладно, проверю. Может и правда, чушь спорол.

Может хватит уже чушь пороть? ...

Может тебе хватит реплики отпускать. Если считаешь, что я не прав - подскажи в чём и где. А то блин только умничать можешь. Затрахал уже.

сказал бы я... да низя

0.05$

С бухами тоже так общаешься?

Я так общаюсь с хамами и высокомерными людьми.

Ну, не совсем чушь ... По крайней мере, из Вашего поста видно, что Вы хоть что-то в этом направлении пытались сделать ... И нехватило Вам лишь самой малости ... ;))

Да, я хам! ... Но я очень добрый хам ... 0.01$

Какой горячий... Зачем так нервничаешь...

а с подлецами и негодяями

А это откуда ? "ЭтоКаталог(Файл)=1" Чего то я не нашёл такого метода. Ты был прав, в чушь с отслеживанием папок. К сожалени. в 1С нет такого метода определить файл это или папка (как с группами в справочнике). Приношу свои извенения

Как это нет? В моей 1С есть!

Вот видишь, зря горячился... А сейчас я тебе скажу, что в 1С есть метдо для определения файл это или каталог, и ты совсем в ступор впадешь...

Давай. Вгони меня в ступор. Облазил весь СП. Нет такого. Может какая приблуда нужна? В стандарте не нашёл.

10 российских копеек ...

Вгоняю. ФС.АтрибутыФайла

+37 четвертый символ: если '1' - каталог;

ступор............................

(37,38) Эх ... :(( Ну и ладно ... Diter бы всё равно удавился бы за эти 10 копеек ...

Я чуствовал, но не дочитал до конца в СП. Сорри. Пошёл впадать в ступор

Мдя... А мож он тебя бы удавил?

Давай, я к тебе буду приезжать и читать тебе СП вслух на ночь? ...

Мало просишь. Я только на оплате банковской операции по переводу денег больше заплачу. Какой смысл?

Тьфу на тебя! А ты из какого города?

Наверное проще спросить "из какого государства"? Или ты может тоже живешь на Украине? Ну тоді пробач дядьку за непорозуміння. У наступний час обов`язково перерахую тобі гроши на жіття.

мне больше всего понравилось-"перетрахую"

Глянь, может поможет.

Гле? Где? Я такого не писал. :)

Это видимо то, что нужно. спасибо.

Впавший в рупор Дитер... Даже не могу себе представить... Рупор! Отставить! Не занимайся дитероедством....

Злой ты какой-то...

Люблю, когда приходит 427 ... :))

В принципе, Петя нормальный человек...

Какой он тебе Петя? ... Пётр Петрович! ...

А вас, гражданин из 54-й палаты, пАпрашу не фамильярничать!!! P.S. никто не знает, где это Лошадка в пальто меня видела?  Вроде я веток на т1с не создавал? Или запамятовал?