Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

Аватара для El Sanchez

Ветеран


Contributor


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

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


Цитата krbmoney:
а можно полученный файл оставить, а остальные удалить? »
krbmoney,
Код: Выделить весь код
@Echo Off
SetLocal
Set Source=C:\Source
For /R "%Source%" %%A In (*.txt) Do (
	If Not Exist "%%~dpA_merged%%~xA" Copy /Y /B "%%~dpA*%%~xA" "%%~dpA_merged%%~xA"
	If /i Not "%%~nxA"=="_merged%%~xA" Del /F /Q "%%A" 2>nul
)
Цитата krbmoney:
или полученные файлы в какую-нить папку закинуть? »
Код: Выделить весь код
@Echo Off
SetLocal
Set Source=C:\Source
Set Output=C:\Output

PushD %Output%
For /R "%Source%" %%A In (*.txt) Do If /i Not "%%~dpA"=="%CD%\" If Not Exist "%%~dpA_merged%%~xA" Copy /Y /B "%%~dpA*%%~xA" "%%~dpA_merged%%~xA"
PopD
For /F "Tokens=1* Delims=:" %%A In ('Dir /B /S _merged.txt^|FindStr /in .') Do Move /Y "%%B" "%Output%\%%~nB_%%A%%~xB" 2>nul
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:43, 13-03-2012 | #4