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
Flasher



PostPosted: Fri Sep 24, 2010 18:04    Post subject: Reply with quote

Ну тогда я выложу Wink :
Code:
@Echo Off
Title Creation X_Y
SetLocal EnableDelayedExpansion

Set #C=%COMMANDER_PATH%\Wincmd.ini
rem Set #C={drive}:\{path}\MyFile.ext

Call :A2 "%CD%"
For /f "tokens=1,* delims=_" %%i In ("%#A%") Do (
   Set #B=%%j
   If Not Defined #B Exit
   MD "%CD:"=%\%%i_job"
   Call :A1 "%#C%"
   Copy /y "%#C%" "%CD:"=%\%%i_job\%#A%!#D!")
Exit /b
:A1
Set #D=%~x1
Exit /b
:A2
Set #A=%~n1
Exit

Сергей Ёлкин (2010)
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group