Создание большого количества каталогов с порядковыми номерами
Q: Нужно создать большое количество каталогов с именами 1_1_1, 1_1_2 и до 9_9_9. Подскажите как?
A: Скрипт на 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
