Код:
@Echo Off
Set "BoxIn=Z:\Box_In"
Set "BoxArc=Z:\Box_Arc"
Set Spisok="Not delete file1.txt" "Not delete file2.kuku" "Not delete file3.doc" "Not delete file4.txt"
For /F "usebackq delims=" %%f In (`2^>nul Dir "%BoxIn%\" /B /A:-D`) Do Call :MyMove "%BoxIn%" "%BoxArc%" "%%f"
Exit /B 0
:MyMove
FOR %%i IN (%Spisok%) DO If /I "%~3"=="%%~i" Exit /B 1
>nul Move /Y "%~1\%~3" "%~2\"
Exit /B
