• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Помогите новичку!

  • Автор темы SashaR
  • Дата начала
Статус
Закрыто для дальнейших ответов.
S

SashaR

Надо создать обработку, выводящую в визуальную таблицу значений структуру папок и файлов диска C с колонками:
должно отображаться наименование папок и файлов, размер файлов, дата последней модификации...

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

Подскажите как это сделать...
заранее благодарю за помощь!!!

есть вот это, но не работает... что и как поменять что заработало, если можно поподробнее...

Функция ПрочитатьКаталог(ИмяКаталога)
Перем ТекКат;
ФС.УстТекКаталог(ИмяКаталога);
ФС.НайтиПервыйФайл();
флВозврат=0;
Пока ФлВозврат=0 Цикл
ТекИмяФайла = ФС.НайтиСледующийФайл();
ТекКат = фС.ТекКаталог();
ФС.АтрибутыФайла(ТекИмяФайла,<РазмерФайла>,<АтрибутыФайла>,<ВремяСоздания>,
<ВремяПоследнегоДоступа>,<ВремяПоследнейЗаписи>,<РасширенноеИмяФайла>)
Если Каталог=1 Тогда
ТЗ.НоваяСтрока()
ТЗ.ИмяФайла = ТекИмяФайла;
ПрочитатьКаталог(ТекИмяФайла);
Иначе
ТЗ.НоваяСтрока()
ТЗ.ИмяФайла = ТекИмяФайла;
КонецЕсли;
КонецЦикла;
КонецФункции
 
L

LSH

Для: SashaR

Гуглите обработку "Сусанин". Как раз ваш случай.
 
S

SashaR

Для: LSH благодарю, сейчас посмотрю...


а можно ссылку...
 
L

LSH

Для: SashaR

ЧТо не работает? Ссылка живая, перед постом сам проверил (открывать левой кнопкой). Обработка которая лежит по ней тоже работает.
 
S

SashaR

все благодарю... вчера с инетом что - то было...
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!