ru.algorithms

 
 - RU.ALGORITHMS ----------------------------------------------------------------
 From : Viktor Karev                         2:5080/1003    21 Nov 2002  19:08:56
 To : Alexey Matvienko
 Subject : Re: алгоритм поиска...
 -------------------------------------------------------------------------------- 
 

 Приветствия!
 
 Alexey Matvienko wrote:
 
 > не могу въехать...
 > нужен пеpебоp вложенных папок и поиск и файлах, котоpые лежат в этих папках...
 > если можно, то на си, php, vb, perl...
 
 процедура Поиск(Каталог,Обработка)
   Результат := HайтиПервыйФайл(Каталог,Маска,Инфо)
   пока (Результат = удовлетворительный) цикл
     если Инфо.Тип = Каталог то
       если (Инфо.Имя = ".") или (Инфо.Имя = "..") то
         Hичего не делать
       иначе
         Поиск(Каталог + Инфо.Имя,Обработка)
       конец если
     иначе
       Обработка(Каталог + Инфо.Имя)
     конец если
     Результат := HайтиСледующийФайл(Инфо)
   конец цикла пока
   КонецПоискаФайлов(Инфо)
 конец процедуры
 
 Важно еще правильно выполнять операцию Каталог + Инфо.Имя, чтобы
 корректно вставлялся слэш (\).
 
 Виктор
 --- ifmail v.2.15dev5
  * Origin: USURT's FidoNET<->Internet Gate (news://news.c (2:5080/1003@fidonet)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    алгоритм поиска...   Alexey Matvienko   20 Nov 2002 19:53:38   Re: алгоритм поиска...   Viktor Karev   21 Nov 2002 19:08:56   алгоритм поиска...   Ianos Gnatiuc   22 Nov 2002 07:08:35