Если в именах файлов возможны русские буквы и батник и текстовый файл с их именами в 866(dos) кодировке
Код:
![Выделить весь код](images/misc/selectcode.png)
@Echo Off
CLS
Set "FName=E:\Delete\file name 866.txt"
Set "From=E:\ddd\Games"
Set "To=E:\ddd\Ку Ку"
Md "%To%" 2>nul
If Not Exist "%From%" (
Echo Папка "%From%" не существует
GoTo :Eof
)
If Not Exist "%FName%" (
Echo Файл "%FName%" не существует
GoTo :Eof
)
FOR /F "usebackq delims=" %%f IN ("%FName%") DO (
FOR /F "usebackq delims=" %%i IN (`Dir "%From%\%%f" /s /A-d /B 2^>nul`) DO (
Echo %%i
Move /Y "%%i" "%To%\"
)
)
Pause
Если в именах файлов возможны русские буквы и батник и текстовый файл с их именами в 1251 кодировке
Код:
![Выделить весь код](images/misc/selectcode.png)
@Echo Off
CLS
Chcp 1251 >nul
Set "FName=E:\Delete\file name 1251.txt"
Set "From=E:\ddd\Games"
Set "To=E:\ddd\Ку Ку"
Md "%To%" 2>nul
If Not Exist "%From%" (
Echo Папка "%From%" не существует
pause
GoTo :Eof
)
If Not Exist "%FName%" (
Echo Файл "%FName%" не существует
pause
GoTo :Eof
)
FOR /F "usebackq delims=" %%f IN ("%FName%") DO (
FOR /F "usebackq delims=" %%i IN (`Dir "%From%\%%f" /s /A-d /B 2^>nul`) DO (
Echo %%i
Move /Y "%%i" "%To%\"
)
)
pause
Подстановочные знаки в именах файлов, например, *.exe, возможны