Форум » [x]Harbour » Создание цепочки директорий » Ответить
Создание цепочки директорий
Dima: Что то не нашел такой функции , есть ли она ? Есть папка C:\1 Если нужно в ней создать подкаталог можно сделать так HB_VFDIRMAKE("c:\1\3") А мне надо бы цепочку подкаталогов сделать типа HB_VFDIRMAKE("c:\1\3\5\6") но не пашет так
Ответов - 8
Andrey: Dima пишет: А мне надо бы цепочку подкаталогов сделать типа HB_VFDIRMAKE("c:\1\3\5\6") но не пашет так Сделай массив aDim := HB_ATokens("c:\1\3\5\6","\",.F.,.F.) А потом в цикле сделай создание подкаталогов. [pre2]For nI := 3 TO LEN(aDim) ....[/pre2]
alkresin: Я такую искал когда-то, но не нашел. Поэтому создаю папки одну за другой. Точно также и удаляю, только с другого конца.
Dima: Спасибо коллеги
SergKis: Dima Создание по вложенным путям делает hb_DirBuild(cPath)
Dima: SergKis Да работает , но с сетевыми путями , лажа конечно. hb_DirBuild("\\127.0.0.1\POCKET\skans\test567") Создало папку на диске C:\127.0.0.1 и тд а ложить надо было в шару
SergKis: Dima пишет с сетевыми путями , лажа конечно. Если на сетевой путь работают ф-ии lExists := hb_vfDirExists( cDirName ) nSuccess := hb_vfDirMake( cDirName ) тогда токенами из всего общего пути делаешь сам, как было сказано выше
Dima: Сергей так и сделал , просто был уверен что твоя подсказка работает и по UNC дороге. Спасибо
Dima: Упс , это у меня Harbour древний , в свежем hb_DirBuild работает нормально с UNC
полная версия страницы