Tol!k

|
Posted: Tue Oct 06, 2009 14:14 Post subject: |
|
|
Обновлённый батник:
- можно перемещать файлы на другую панель или в конкретную папку;
- обрабатываются файлы с "!" в тегах;
Code: | @echo off &chcp 1251 >nul
echo Перемещает выделенные муз.файлы в папки "Artist [Year] Album\"
rem Requirements: WDX columns extractor http://upload.com.ua/get/901076644/
rem Parameters: %L
rem or %L "%T"
rem or %L "D:\My Music\"
rem Autor: Tol!k
setlocal enableextensions
for /f "delims=" %%f in ('sort /r %1') do (echo %%f &call :f "%%f" %2)
exit
:f
for /f "delims=" %%A in ('wdx.exe %COMMANDER_PATH%\wdx\anytag\anytag.wdx "%~1" Artist') do set "Artist=%%~A"
for /f "delims=" %%B in ('wdx.exe %COMMANDER_PATH%\wdx\anytag\anytag.wdx "%~1" Year') do set "Year=%%~B"
for /f "delims=" %%C in ('wdx.exe %COMMANDER_PATH%\wdx\anytag\anytag.wdx "%~1" Album') do set "Album=%%~C"
set "Folder=%~2%Artist% [%Year%] %Album%"
if not exist "%Folder%" md "%Folder%"
if exist "%Folder%\" move "%~1" "%Folder%\"
goto :eof |
Last edited by Tol!k on Thu Oct 08, 2009 14:37; edited 1 time in total |
|