Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2735
Благодарности: 1699

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
@Echo Off
cls
	Set "FileFlag=D:\CMD_Forum\Box_In\Catalog\filename."
	Set "BoxOut=Z:\Box_Out\Source"
	Set /A Size=204800

	FOR /F "usebackq tokens=1 delims=" %%i IN (`2^>nul Dir "%FileFlag%" /S /A:-D /B`) DO (
		Call :FileSize "%FileFlag%" "%BoxOut%\" %Size% "%%i" %%~zi
	)
pause
Exit /B

:FileSize
	If %5 LEQ %3 Exit /B 1
	Set "In=%~dp4"	
	Set "InD=%~dp1"
	Set "Out=%~2"
	Call Set Out=%%In:%InD%=%Out%%%
	
	Xcopy "%~dp4*.*" "%Out%" /S /Y /F /D
Exit /B 0
Если только файл filename. не более 2 147 483 647 байт

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 17-04-2020 в 21:26.

Это сообщение посчитали полезным следующие участники:

Отправлено: 21:14, 17-04-2020 | #3