Страница 1 из 3

Автоматизированное создание папок

Добавлено: Пт июн 02, 2006 17:10
Buch
Извините, уверен что такая тема уже была, но найти не смог.
Собственно интересует как в тотале можно создать много папок одновременно и чтоб они лежали в одном каталоге. Как создать дерево папок я знаю, нужно нажать F7 и написать там следующее: "Название папки/Название другой папки/Название третей папки", тогда мы получим: "C:\Название папки\Название другой папки\Название третей папки"

Добавлено: Пт июн 02, 2006 17:13
Batya
нажать F7 и написать там следующее: "Название папки|Название другой папки|Название третей папки"

Добавлено: Пт июн 02, 2006 17:14
Buch
ХА! Методом перебора нашел! Нужно использовать знак "|": "Название папки|Название другой папки|Название третей папки", тогда мы получим: "C:\Название папки\Название другой папки\Название третей папки"

Добавлено: Пт июн 02, 2006 17:23
funduk
Можно было бы и справку почитать :?

Добавлено: Вт сен 26, 2006 22:55
advin
а если надо создать допустим большой диапазон от 1_1_1 до 9_9_9, тут папок больше тыщи, как тогда быть? такой случай был.

Добавлено: Вт сен 26, 2006 23:54
CaptainFlint
advin писал(а):а если надо создать допустим большой диапазон от 1_1_1 до 9_9_9, тут папок больше тыщи, как тогда быть? такой случай был.
Тогда скрипт или батник.

Добавлено: Ср сен 27, 2006 10:38
Batya
advin писал(а):а если надо создать допустим большой диапазон от 1_1_1 до 9_9_9
CaptainFlint писал(а):Тогда скрипт или батник.
vbs-скрипт:

Код: Выделить всё

'=============================================================
' Создание в текущем каталоге папок с именами 1_1_1 ... 9_9_9
'=============================================================

Option Explicit
Dim FSO, i
Set FSO = CreateObject("Scripting.FileSystemObject")
For i = 111 To 999
  FSO.CreateFolder i \ 100 & "_" & (i Mod 100)\ 10 & "_" & (i Mod 10)
Next

Set FSO = Nothing
WScript.Quit
Папки будут создаваться в каталоге "Путь запуска" кнопки. Если он пуст, то в текущем каталоге TC.
advin писал(а):тут папок больше тыщи
Странно, а мне казалось, что 999 - 110 = 889 :)

Добавлено: Чт фев 12, 2009 16:30
Vazoy
А куда его пихать?

Добавлено: Чт фев 12, 2009 17:37
Вахмурка

Добавлено: Чт фев 12, 2009 17:37
Arhangel
Да уж, не хватает Тоталу инструмента для массового создания каталогов. Может кто-то напишет Гислеру, а вдруг сделает ?

Добавлено: Чт фев 12, 2009 17:51
Вахмурка
Тоталу много чего не хватает. А если написать Гислеру, он ответит: вон тебе уже ДВА скрипта предложили, а тебе все мало? Ну, встрою я такой инструмент в Тотал, так скажут: не, этого мало, нам надо, чтобы такая возможность в операционку была встроена! А потом, глядишь, и в биос...

Добавлено: Пт фев 13, 2009 10:29
Batya
Arhangel писал(а):Да уж, не хватает Тоталу инструмента для массового создания каталогов.
См. выше:
Batya писал(а):нажать F7 и написать там следующее: "Название папки|Название другой папки|Название третей папки"
А придумывать гипотетические требования к TC, которые пригодятся одному из миллиона, можно до бесконечности.
Vazoy писал(а):А куда его пихать?
Создай тетсковый файл с расширением vbs и указанным содержимым. Повесь файл на кнопку\команду. Запуск этого файла Windows обработает, как запуск исполяемого файла (а-ля *.exe).
Начет последней фразы, прошу не пинать ногами, пытаюсь объяснить по-проще.

Добавлено: Пт фев 13, 2009 13:38
CaptainFlint
[mod="CaptainFlint"]Перенесено в "Автоматизацию".[/mod]

Добавлено: Чт фев 26, 2009 13:18
Arhangel
Вахмурка писал(а):Тоталу много чего не хватает. А если написать Гислеру, он ответит: вон тебе уже ДВА скрипта предложили, а тебе все мало? Ну, встрою я такой инструмент в Тотал, так скажут: не, этого мало, нам надо, чтобы такая возможность в операционку была встроена! А потом, глядишь, и в биос...
Не хватает, на самом деле, мало. (Про операционку не понял вообще, хотя такая функция в ней и полезна была, с чего-бы к Гислеру писали с вопросами об изминении ОСи ?)

И да, эти скрипты меня не устраивают.
Batya писал(а):нажать F7 и написать там следующее: "Название папки|Название другой папки|Название третей папки"
Для 40+ папок ?

Добавлено: Чт фев 26, 2009 14:03
Worros
Batya писал(а):А придумывать гипотетические требования к TC, которые пригодятся одному из миллиона, можно до бесконечности.
Подпишусь под каждым словом.