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

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

Ветеран


Contributor


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

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


Код: Выделить весь код
@Echo Off &Cls
	Set "FileIn=Z:\Box_In\1\file.doc"
	Set "BoxOut=Z:\Box_Out\2"
	Set "Mask=file-20??????.doc"
	Set /A N=7
	
	FOR /F "tokens=2 delims==." %%d In ('WMIC OS GET LOCALDATETIME /VALUE') DO Set "d=%%d"
	Set /A d=%d:~0,8%

	For %%f In ("%FileIn%") Do >nul Copy %%f "%BoxOut%\%%~nf-%d%%%~xf"
	For /F "usebackq skip=%N% delims=" %%f In (`2^>nul Dir "%BoxOut%\%Mask%" /B /A:-D /O:-D /T:W`) Do Del "%BoxOut%\%%f"
Pause
Exit /B

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


Последний раз редактировалось megaloman, 02-02-2024 в 15:37.

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

Отправлено: 11:23, 02-02-2024 | #2