Любой язык - [решено] Переименование указанного количества файлов следуя нумерации

slav13 · Отправлено: **21:00, 17-11-2017** | #11

Здравствуйте.
Помогите! Есть ли в вашей практике вариант bat файла для запуска в директории с файлами, которые надо пронумеровать.
Добавить номер перед именем файла (не меняя его), например: 001 имя.txt (здесь пробел между номером и именем файла) и т.д. до 150,
не зависимо от количества фалов в директории. Нумеруются строго 150 файлов. Если их < 150, заканчивает работу.
Если их >150, нумерует 150 и заканчивает работу. Если в числе нумеруемых файлов попадаются файлы уже пронумерованные,
то их номера заменяются на текущие.
Спасибо!

slav13 · Отправлено: **22:03, 17-11-2017** | #12

Georgio
Здравствуйте.
Помогите! Есть ли в вашей практике вариант bat файла для запуска в директории с файлами, которые надо пронумеровать.
Добавить номер перед именем файла (не меняя его), например: 001 имя.txt (здесь пробел между номером и именем файла) и т.д. до 150,
не зависимо от количества фалов в директории. Нумеруются строго 150 файлов. Если их < 150, заканчивает работу.
Если их >150, нумерует 150 и заканчивает работу. Если в числе нумеруемых файлов попадаются файлы уже пронумерованные,
то их номера заменяются на текущие.
Спасибо!

Alexander_88 · Отправлено: **05:33, 07-07-2019** | #13

Здравствуйте.. опять потревожила эта задача с наименованиями типа start0001, start0002 (цифры в конце). Может есть, кто в курсе темы?
Делаю так (пытаюсь хотя бы файл переименовать):

Код:

@echo off
chcp 1251>nul

set number=1
set "folder=G:\03 start"

set "reg_exp=^start[0-9][0-9][0-9][0-9]\...*"
for /f "delims=" %%? in ('
 dir /a-d/b/o-n "%folder%\start*.*"^| findstr /ir "%reg_exp%"
') do (
 set max=%%?
 goto:#
 )

:#
set count=1%max:~,4%
for /f "delims=" %%? in ('
 dir /a-d/b "%folder%"^| findstr /irv "%reg_exp%"
') do (
 set /a count_2+=1
 for /f %%* in ('
  set /a count_2
 ') do (
  if %%* leq %number% (
   set /a count+=1
   call ren "%folder%\%%?" "start%%count:~1%%%%~x?"
   ) else (
   exit /b
   )
  )
 )
exit /b

файл переименовывается в start.. но цифры в конце не добавляются(( Может кто - то знает, что еще исправить, чтобы заработало?

Alexander_88 · Отправлено: **11:04, 07-07-2019** | #14

Если для BAT это не корректно, может есть решение для PowerShell (поменял, на "Любой язык").

megaloman · Отправлено: **11:20, 07-07-2019** | #15

Alexander_88, Вот вариант

Код:

@Echo Off
cls
>nul Chcp 1251
 
	Set "BoxIn=Z:\Soft_In"
	Set "Kword=start"
	Set "Reg=^%Kword%[0-9][0-9][0-9][0-9]\..*"
	Set /A M=4

	Set "Mask=*.*"
	Set /A Max=25	
	
	Set /A Num=1000000
	Set /A MMax=%Max%+%Num%
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Kword%*.*" /B /O:N /A:-D ^|findstr /I /R /C:"%Reg%"`) DO (
		Call :RenNNN "%BoxIn%" "%%a" "%Kword%" %M% %MMax% ||Exit /B 1
	)

	Set /A Num=1000000
	Set /A MMax=%Max%+%Num%
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Mask%" /B /O:N /A:-D`) DO (
		Call :RenNNN "%BoxIn%" "%%a" "%Kword%" %M% %MMax% ||Exit /B 1 
	)
Pause
Exit /B

:RenNNN
	Set /A Num+=1
	If %Num% GTR %5 Exit /B 1 
	Call Set "NNum=%%Num:~-%4%%"
	2>nul Ren "%~1\%~2" "%~3%NNum%%~x2" ||GoTo :RenNNN
Exit /B 0

Как это организовано:
В первом For просматриваем файлы startNNNN.* и перенумеровываем их вподряд start0001, start0002 ...
Во втором For переименовываем все остальные файлы по указанной маске в start c последующими номерами
Если этого не нужно, этот for надо или заремить, или убрать

Есть возможность ограничить число переименований файлов (Set /A Max=25)
Если этого не надо, можно задать заведомо большое число, или заремить If %Num% GTR %5 Exit /B 1

То же для NNNNstart.*

Код:

@Echo Off
cls
>nul Chcp 1251
 
	Set "BoxIn=Z:\Soft_In"
	Set "Kword=start"
	Set "Reg=^[0-9][0-9][0-9][0-9]%Kword%\..*"
	Set /A M=4

	Set "Mask=*.*"
	Set /A Max=25	
	
	Set /A Num=1000000
	Set /A MMax=%Max%+%Num%
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Kword%*.*" /B /A:-D ^|findstr /I /R /C:"%Reg%"`) DO (
		Call :RenNNN "%BoxIn%" "%%a" "%Kword%" %M% %MMax% ||Exit /B 1
	)

	Set /A Num=1000000
	Set /A MMax=%Max%+%Num%
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Mask%" /B /A:-D`) DO (
		Call :RenNNN "%BoxIn%" "%%a" "%Kword%" %M% %MMax% ||Exit /B 1 
	)
Pause
Exit /B

:RenNNN
	Set /A Num+=1
	If %Num% GTR %5 Exit /B 1 
	Call Set "NNum=%%Num:~-%4%%"
	2>nul Ren "%~1\%~2" "%NNum%%~3%~x2" ||GoTo :RenNNN
Exit /B 0

Alexander_88 · Отправлено: **12:50, 07-07-2019** | #16

Спасибо, попробовал убрать, первый for, потом второй.
Но в обоих случаях переименовываются сами файлы start. Видимо нужно было конкретнее написать.. Скрипт не должен их трогать, переименовывать нужно только другие файлы (все, кроме start****). Необходимо продолжить нумерацию вперед, не принимая во внимание предыдущую нумерацию. Т.е. найти самый последний номер (самый большой) и продолжить от него нумерацию.

например было:

Код:

00uyjkskh.wmv
start0056.mp4
start0057.avi
start0058.wmw
ljsfdhgsjkd.avi
ziyxvyz.mpg

Мы задаем количество - 2 файла для переименования (нужно обязательно указывать нужное количество, чтобы не переименовывалось все)

стало:

Код:

start0056.mp4
start0057.avi
start0058.wmw
start0059.wmv
start0060.avi
ziyxvyz.mpg

Переименовались:
00uyjkskh.wmv > start0059.wmv
ljsfdhgsjkd.avi > start0060.avi

Файлы start0056.mp4, start0057.avi, start0058.wmw остались неизменными.

Файлы, которые переименовываются, могут переименовываться в любой последовательности, не обязательно по алфавиту, главное, чтобы не переименовывались файлы start****, переименовываться должны все другие (точнее не все, а указанное мной количество.

megaloman · Отправлено: **13:59, 07-07-2019** | #17

Alexander_88, Предыдущий вариант переименовывает все файлы, нумерацию делает с 1. Сделано в условиях нечеткой постановки. Если надо продолжить нумерацию, и не обращать внимание, есть ли там прорехи, и переименовать нужное кол-во файлов, вот вариант:

Код:

@Echo Off
cls
>nul Chcp 1251
 
	Set "BoxIn=Z:\Soft_In"
	Set "Kword=start"
	Set "Reg=^%Kword%[0-9][0-9][0-9][0-9]\..*"
	Set /A M=4

	Set "Mask=*.*"
	Set /A Max=2

	Set /A NMax=0	
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Kword%*.*" /B /O:N /A:-D ^|findstr /I /R /C:"%Reg%"`) DO (
		Set "NMax=%%~na"
		Call Set "NMax=1%%NMax:~-%M%%%"
	)

	Set /A Num=1000000
	Set /A Num=%Num%+%NMax% 
	Set /A MMax=%Max%+%Num%

	Set /A MMax=%Max%+%Num%
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Mask%" /B /O:N /A:-D ^|findstr /I /R /V /C:"%Reg%"`) DO (
		Call :RenNNN "%BoxIn%" "%%a" "%Kword%" %M% %MMax% ||Exit /B 1 
	)
Pause
Exit /B

:RenNNN
	Set /A Num+=1
	If %Num% GTR %5 Exit /B 1 
	Call Set "NNum=%%Num:~-%4%%"
	2>nul Ren "%~1\%~2" "%~3%NNum%%~x2" ||GoTo :RenNNN
Exit /B 0

Первый For ищет максимальный номер, во втором - переименовываются остальные файлы (заданное количество)

Alexander_88 · Отправлено: **17:16, 07-07-2019** | #18

Спасибо, все работает, а количество задавать только здесь?

Код:

Set /A Max=2

больше нигде не надо?

megaloman · Отправлено: **17:22, 07-07-2019** | #19

Alexander_88, я стремлюсь, чтобы все исходные данные были в одном месте, так что, только здесь и один раз.

Alexander_88 · Отправлено: **05:56, 08-07-2019** | #20

а не подскажете вариант (на всякий случай) для NNNNstart ?

Поменял, но видимо, что то еще надо изменить, файлы переименовываются, но нету продолжения от максимального номера.. переименовывается с 0001start

Код:

@Echo Off
cls
>nul Chcp 1251
 
	Set "BoxIn=F:\01 start"
	Set "Kword=start"
	Set "Reg=^[0-9][0-9][0-9][0-9]%Kword%\..*"
	Set /A M=4

	Set "Mask=*.*"
	Set /A Max=1

	Set /A NMax=0	
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\*%Kword%.*" /B /A:-D ^|findstr /I /R /C:"%Reg%"`) DO (
		Set "NMax=%%~na"
		Call Set "NMax=1%%NMax:~-%M%%%"
	)

	Set /A Num=1000000
	Set /A Num=%Num%+%NMax% 
	Set /A MMax=%Max%+%Num%

	Set /A MMax=%Max%+%Num%
	FOR /F "usebackq delims=" %%a IN (`2^>nul Dir "%BoxIn%\%Mask%" /B /A:-D ^|findstr /I /R /V /C:"%Reg%"`) DO (
		Call :RenNNN "%BoxIn%" "%%a" "%Kword%" %M% %MMax% ||Exit /B 1 
	)
Pause
Exit /B

:RenNNN
	Set /A Num+=1
	If %Num% GTR %5 Exit /B 1 
	Call Set "NNum=%%Num:~-%4%%"
	2>nul Ren "%~1\%~2" "%NNum%%~3%~x2" ||GoTo :RenNNN
Exit /B 0