CMD/BAT

gora · Конфигурация компьютера

Код:

@Echo Off
SetLocal enabledelayedexpansion
Set src=C:\1234cv01.rar
Set out=c:\arhiv

For /L %%i In (0,1,99) Do (
	Set nb=0%%i
	Set nb=!nb:~-2!
	If Not Exist "%out%\1234rn!nb!.rar" (Move "%src%" "%out%\1234rn!nb!.rar" & Exit)
)

sanat · Отправлено: **13:40, 27-07-2010** | #3

gora спасибо большое.

А если нужно переместить не один файл , а сразу несколько 1234cv??.rar , в эту папку переименовав в каждый по очереди ?

gora · Конфигурация компьютера

Код:

@Echo Off
SetLocal enabledelayedexpansion
Set src=C:\1234cv??.rar
Set out=C:\arhiv

For %%a In ("%src%") Do Call :_mov "%%a"
Exit

:_mov
For /L %%i In (0,1,99) Do (
	Set nb=0%%i
	Set nb=!nb:~-2!
	If Not Exist "%out%\1234rn!nb!.rar" (Move "%~1" "%out%\1234rn!nb!.rar" & GoTo :EOF)
)
GoTo :EOF

Borg · Отправлено: **15:45, 27-07-2010** | #5

А можно аналогично мне подсказать?

Имеются 6 папок у меня:
of, og, or, on, oz, ov
В каждую папку скидываются однотипные файлы вида defs????.ft?, причем в любой папке может быть произвольное количество файлов.

И есть седьмая папка Sbor, куда я должен из каждой папки закинуть(переместить) файлы со всех предыдущих 6 папок.

Причем из каждой папки я должен назвать файл вида defs"имя папки"??.ft? Тоесть файлы из папки of будут называться defsof??.ft?

И конечно последние два символа как и в вашем примере должны генерироваться от 00 до 99 сами. А ft? каждый месяц меняется в июле он выгружается с 7 на конце в августе будет 8 и т.д., поэтому его жестко прописывать в бат файле не надо.

Помогите пожалуйста автоматизировать, а то работа очень трудоемкая и отнимает много времени.

gora · Конфигурация компьютера

Цитата Borg:

в августе будет 8 »

А в декабре 12?

Код:

@Echo Off
SetLocal enabledelayedexpansion
Set src=of og or on oz ov
Set out=Sbor
Set msc=defs????.ft?

For %%f In (%src%) Do (
	Set tf=%%f
	For %%a In ("%%f\%msc%") Do Call :_mov "%%~nxa"
)
Exit

:_mov
For /L %%i In (0,1,99) Do (
	Set nb=0%%i
	Set nb=!nb:~-2!
	If Not Exist "%out%\defs!tf!!nb!%~x1" (Move "!tf!\%~1" "%out%\defs!tf!!nb!%~x1" & GoTo :EOF)
)
GoTo :EOF

Цитата Borg:

октябрь - a
ноябрь - b
декабрь - c »

поправил с учетом уточнения (хотя он и до этого работал)

Borg · Отправлено: **07:38, 28-07-2010** | #7

Цитата:

А в декабре 12?

октябрь - a
ноябрь - b
декабрь - c

41275jur · Отправлено: **01:33, 19-06-2013** | #8

Доброе время суток.
gora,

Цитата:

cho Off
SetLocal enabledelayedexpansion
Set src=C:\1234cv??.rar
Set out=C:\arhiv

For %%a In ("%src%") Do Call :_mov "%%a"
Exit

:_mov
For /L %%i In (0,1,99) Do (
Set nb=0%%i
Set nb=!nb:~-2!
If Not Exist "%out%\1234rn!nb!.rar" (Move "%~1" "%out%\1234rn!nb!.rar" & GoTo :EOF)
)
GoTo :EOF

В этом скрипте переименовывает только 100 файлов. Как написать что бы можно было переименовать все файлы?