CMD/BAT - [решено] Переименование и копирование файлов

Iska · Отправлено: **12:10, 17-08-2018** | #2

Цитата jordan_74:

файлов может быть более тысячи »

И что Вы хотите получить в этом случае — с трёхзначным-то:

Цитата jordan_74:

Нужно чтобы нумерация начиналась с 001 и к имени добавлялся номер папки.
например check001_1, check002_1, check003_1 »

значением номера?!

Цитата jordan_74:

Хочу создать батник, »

PowerShell Вас устроит?

jordan_74 · Отправлено: **12:45, 17-08-2018** | #3

Цитата Iska:

И что Вы хотите получить в этом случае — с трёхзначным-то: »

Можно ограничиться до тысячи, 999

Цитата Iska:

Нужно чтобы нумерация начиналась с 001 и к имени добавлялся номер папки.
например check001_1, check002_1, check003_1 » »

Именно так да

Цитата Iska:

PowerShell Вас устроит? »

Желательно батник конечно

Iska · Отправлено: **13:43, 17-08-2018** | #4

Цитата jordan_74:

Желательно батник конечно »

Нет, я тут пас — мало желания на пакетных файлах пытаться выцепить значимую часть имени из произвольно взятых:

Цитата jordan_74:

check1,check2,check3 »

jordan_74 · Отправлено: **13:56, 17-08-2018** | #5

Тем не менее благодарю за попытку!!

megaloman · Отправлено: **14:19, 17-08-2018** | #6

Iska, Кто хочет сделать - ищет способ, кто не хочет - причину.

Вот вариант (скрипт 1)

Код:

@Echo Off
cls
	Set "BoxIn=Z:\Box_In"
	Set "Folds="1111" "2222""

	Set "Pref=check"
	Set "Mask=%Pref%*.*"
	Set /A Max=1000
	
	Set "BoxOut=Z:\Box_In\Total"

	If Not Exist "%BoxOut%" Md "%BoxOut%"
	
	Pushd "%BoxIn%" &&(
		FOR %%d IN (%Folds%) DO (
			FOR %%f IN ("%%~dpnxd\%Mask%") DO (
				Call :RenCopy "_%%~d" "%%f" "%%~nf" "%%~xf" "%BoxOut%"
			)
		)
		Popd
	)
Pause
GoTo :Eof

:RenCopy
	Set "NewName=%~3"
	Call Set "NewName=%%NewName:%Pref%=%%"
	2>nul Set /A NewName=%NewName%+%Max% ||GoTo :Eof
	Set "NewName=%Pref%%NewName:~1%%~1%~4"
	>nul Copy %2 "%~5\%NewName%"
	>nul Ren %2 "%NewName%" 
GoTo :Eof

Как я понимаю, имена папок и файлов в вопросе условны.
Главное, чтобы выдерживалось правило образования имени : ПрефиксНомерРасширение. Расширение может и отсутствовать, тогда:
Set "Mask=%Pref%*."
Предполагаю, что обе подпапки находятся в общей папке. Имена корневой папки, подпапок, выходной папки укажите сами. Кстати, число подпапок в моём решении произвольно, извольте их перечислить.
Укажите префикс в именах файлов, в Вашем вопросе он check
Можно задать формат номера в новом имени.
Для Max=1000 номер будет трёхзначным, например, 001
Для Max=10000 номер будет четырёхзначным, например, 0002
В выходную папку копируются файлы с новым именем.
В исходной папке файлы переименовываются.
Если не надо, чтобы переименовывались файлы в исходной папке, уберите строку с ren

Iska · Отправлено: **14:24, 17-08-2018** | #7

Цитата megaloman:

Iska, Кто хочет сделать - ищет способ, кто не хочет - причину. »

megaloman, по условию задачи ничего не сказано про постоянный префикс. Совсем ничего. Просто дан пример возможных имён файлов. Как решите задачу с произвольными именами — я с Вами соглашусь.

YuS_2 · Отправлено: **14:40, 17-08-2018** | #8

Цитата megaloman:

Кто хочет сделать - ищет способ, кто не хочет - причину. »

я бы сказал так:
кто хочет передвигаться быстро, садится на транспорт и едет, а кому надо просто добраться и у него времени "вагон", тот может и пешком ходить...

Iska · Отправлено: **14:45, 17-08-2018** | #9

Цитата YuS_2:

кто хочет передвигаться быстро, садится на транспорт и едет, а кому надо просто добраться и у него времени "вагон", тот может и пешком ходить... »

Неточная цитата

Цитата:

Слушай птичка, летим со мной, там много вкусного! … Лучше день потерять, зато потом за час долететь!

YuS_2 · Отправлено: **15:20, 17-08-2018** | #10

Цитата Iska:

Лучше день потерять, зато потом за час долететь! »

Крыля... ноги... главное - хвост!