Tol!k

|
Posted: Fri Dec 18, 2009 02:26 Post subject: |
|
|
Itar-Tass
Сохрани код в текстовый файл с расширением .cmd ;
допиши остаток алфавита ;
помести файл в нужную папку (или создай кнопку) и запусти
:::::::::::::::::::::::::::::::::::::::::::::::::: абвг.cmd ::::::::::::::::::::::::::::::::::::::::::::::::::
Code: | @echo off &chcp 1251 >nul
rem Рассортировать папки в подпапки А,Б,В,Г,...
rem По первой букве в названии папки
setlocal enableextensions
for %%a in (А Б В Г Д Е) do (
for /d %%d in (%%a*) do (
if not "%%a"=="%%d" (
if not exist "%%a" md "%%a"
move "%%d" "%%a\%%d" >nul
)
)
) |
:::::::::::::::::::::::::::::::::::::::::::::::::: абвг.cmd ::::::::::::::::::::::::::::::::::::::::::::::::::
Last edited by Tol!k on Sat Jan 09, 2010 16:03; edited 2 times in total |
|