Модераторы: d-view, Моторокер, Avada, CaptainFlint, Nik
Код: Выделить всё
@echo off &setlocal enableextensions
set "Folder=%%Year%%\TEST-%%N\Example_%%M"
set /a cntN=70
set /a cntM=2
call :Year
for /l %%N in (1,1,%cntN%) do (
for /l %%M in (1,1,%cntM%) do (
call 2>nul md "%Folder%"
)
)
goto :eof
:Year
:: date DD.MM.YY
for /f "tokens=3 delims=-/." %%y in ("%date%") do set /a Year=20%%y
if %Year% GTR 200000 set /a Year=Year-200000
goto :eof
)обновил кодDiverNirvana писал(а):создавать рядом с собой
изменить вид нумерации на двухзначный
Код: Выделить всё
@echo off &setlocal enableextensions
set "Folder=%%Year%%\TEST-%%N%%\Example_%%M%%"
set /a cntN=70
set /a cntM=2
call :Year
for /l %%n in (1,1,%cntN%) do (
set /a N=100%%n &call set N=%%N:~-2%%
for /l %%m in (1,1,%cntM%) do (
set /a M=100%%m &call set M=%%M:~-2%%
call 2>nul md "%Folder%"
)
)
goto :eof
:Year
:: date DD.MM.YY
for /f "tokens=3 delims=-/." %%y in ("%date%") do set /a Year=20%%y
if %Year% GTR 200000 set /a Year=Year-200000
goto :eof
русских форумов? на осзоне есть, на ру-борде 2 темырусских пока не нашел
Код: Выделить всё
@echo off &setlocal enableextensions
set "Folder=%%Year%%\TEST-%%N%%\%%Name%%"
set /a cntN=70
set "Names=Morning;Evening;Blah Blah Blah"
call :Year
for /l %%n in (1,1,%cntN%) do (
set /a N=100%%n &call set N=%%N:~-2%%
call :Name "%Names%"
)
)
goto :eof
:Name
for /f "tokens=1,* delims=;" %%a in ("%~1") do (
set "Name=%%~a"
call 2>nul md "%Folder%"
if not "%%~b"=="" call :Name "%%b"
)
goto :eof
:Year :: date DD.MM.YY
for /f "tokens=3 delims=-/." %%y in ("%date%") do set /a Year=20%%y
if %Year% GTR 200000 set /a Year=Year-200000
goto :eof
Да, точно так как вы сделали - Спасибо огромное.Tol!k писал(а):Morning и Evening без цифр?
) понял а вот с разными именами.... я сколько не пытался, так ничего и не добился....Код: Выделить всё
Left(D, 5)Это чем же лучше, если точки дают очевидный формат? Знаки подчёркивания не воспринимаются. Если очень надо, то в 24 строке точки на них легко меняются. Переписывать скрипт под число в конце имени не вижу смысла, т.к. там совсем другой подход будет, придётся с конца строки поочерёдно проверку делать на предмет цифры. Мне не нравится этот путь. И тут речь идёт о создании папок с нуля, а не относительно имён выбранных.Nick писал(а):И тогда, лучше бы так
Так ведь, наверно, можно как-то использовать регулярное выражение вида:Flasher писал(а):придётся с конца строки поочерёдно проверку делать на предмет цифры.
Код: Выделить всё
\d{4}_\d{2}_\d{2}