Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Создание папки вида: дата+время 
Author Message
Tol!k



PostPosted: Wed Nov 27, 2013 23:11    Post subject: Reply with quote

DiverNirvana wrote:
создавать рядом с собой

обновил код

Добавлено спустя 29 минут:

Quote:
изменить вид нумерации на двухзначный

Code:
@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


Last edited by Tol!k on Wed Nov 27, 2013 23:14; edited 1 time in total
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group