[alpap]

да все уже придумали собственно.

[megaloman]

Вот решение, как поставлена задача: не найденные в другой папке файлы перемещаются в папку Remove

Код:

@Echo Off

Set "Box1=Z:\Box_In\Фотки 1"
Set "Arc1=Z:\Box_In\Фотки 1\Remove"

Set "Box2=Z:\Box_In\Фотки 2"
Set "Arc2=Z:\Box_In\Фотки 2\Remove"

Call :Remove "%Box2%" "%Arc1%" "%Box1%"
Call :Remove "%Box1%" "%Arc2%" "%Box2%"

GoTo :Eof

:Remove
	If Not Exist "%~2" Md "%~2" 
	FOR /F "usebackq delims=" %%d IN (`dir "%~3" /b /A:D`) DO (
		If Not "%~nx2"=="%%d" If Exist "%~1\%%d" (
			FOR /F "usebackq delims=" %%f IN (`dir "%~3\%%d" /b /A:-D 2^>nul`) DO (
				If Not Exist "%~1\%%d\%%f" Move /Y "%~3\%%d\%%f" "%~2\" >nul
			)
		)
	)
GoTo :Eof

Здесь файлы перемещаются в папку Remove, но, однако, в этой папке этот файл помещается в подпапку с тем же именем, из которого он был удалён

Код:

@Echo Off

Set "Box1=Z:\Box_In\Фотки 1"
Set "Arc1=Z:\Box_In\Фотки 1\Remove"

Set "Box2=Z:\Box_In\Фотки 2"
Set "Arc2=Z:\Box_In\Фотки 2\Remove"

Call :Remove "%Box2%" "%Arc1%" "%Box1%"
Call :Remove "%Box1%" "%Arc2%" "%Box2%"

GoTo :Eof

:Remove
	If Not Exist "%~2" Md "%~2" 
	FOR /F "usebackq delims=" %%d IN (`dir "%~3" /b /A:D 2^>nul`) DO (
		If Not "%~nx2"=="%%d" (
			FOR /F "usebackq delims=" %%f IN (`dir "%~3\%%d" /b /A:-D 2^>nul`) DO (
				If Not Exist "%~1\%%d\%%f" (
					If Not Exist "%~2\%%d" Md "%~2\%%d" 
					Move /Y "%~3\%%d\%%f" "%~2\%%d\" >nul
				)
			)
		)
	)
GoTo :Eof

[dokxpi@vk]

Код: »

megaloman, спасибо за то что обратили внимание на пост и попытались помочь, но
к сожалению ваше решение не работает

[megaloman]

dokxpi@vk, как понять "не работает", что при запуске скрипта происходит? Вы прописали свои реальные пути к папкам? В именах Ваших папок есть русские символы? В таком случае, в какой кодировке сохранили скрипт?
Еще раз проверил - скрипт рабочий. Единственное, забыл предупредить, что если какой-то под "Папки I" в одной папке есть, а в другой не существует, такая подпапка не обрабатывается, так как Вы в вопросе указали одинаковую структуру подпапок.
В предыдущем посте исправил в решении небольшую неточность и добавил еще одно более развитое работающее решение.

[dokxpi@vk]

megaloman, вы были правы
Спасибо большое