Командная строка, батники, сценарии (bat, cmd) - [716] :: Программы

Код:

@ECHO OFF & SETLOCAL ENABLEEXTENSIONS ENABLEDELAYEDEXPANSION
CHCP 1251
CLS
CD /D %1
if not %errorlevel%==0 goto :EOF
FOR %%A IN (*.*) DO (
SET FILENAME=%%~nA
SET FILENAME=!FILENAME:ж=zh!
SET FILENAME=!FILENAME:Ж=ZH!
SET FILENAME=!FILENAME:ц=ts!
SET FILENAME=!FILENAME:Ц=TS!
SET FILENAME=!FILENAME:ч=ch!
SET FILENAME=!FILENAME:Ч=CH!
SET FILENAME=!FILENAME:ш=sh!
SET FILENAME=!FILENAME:Ш=SH!
SET FILENAME=!FILENAME:щ=sch!
SET FILENAME=!FILENAME:Щ=SCH!
SET FILENAME=!FILENAME:ю=yu!
SET FILENAME=!FILENAME:Ю=YU!
SET FILENAME=!FILENAME:я=ya!
SET FILENAME=!FILENAME:Я=YA!
SET FILENAME=!FILENAME:а=a!
SET FILENAME=!FILENAME:б=b!
SET FILENAME=!FILENAME:в=v!
SET FILENAME=!FILENAME:г=g!
SET FILENAME=!FILENAME:д=d!
SET FILENAME=!FILENAME:е=e!
SET FILENAME=!FILENAME:ё=e!
SET FILENAME=!FILENAME:з=z!
SET FILENAME=!FILENAME:и=i!
SET FILENAME=!FILENAME:й=j!
SET FILENAME=!FILENAME:к=k!
SET FILENAME=!FILENAME:л=l!
SET FILENAME=!FILENAME:м=m!
SET FILENAME=!FILENAME:н=n!
SET FILENAME=!FILENAME:о=o!
SET FILENAME=!FILENAME:п=p!
SET FILENAME=!FILENAME:р=r!
SET FILENAME=!FILENAME:с=s!
SET FILENAME=!FILENAME:т=t!
SET FILENAME=!FILENAME:у=u!
SET FILENAME=!FILENAME:ф=f!
SET FILENAME=!FILENAME:х=h!
SET FILENAME=!FILENAME:ъ='!
SET FILENAME=!FILENAME:ы=i!
SET FILENAME=!FILENAME:ь='!
SET FILENAME=!FILENAME:э=e!
SET FILENAME=!FILENAME:А=A!
SET FILENAME=!FILENAME:Б=B!
SET FILENAME=!FILENAME:В=V!
SET FILENAME=!FILENAME:Г=G!
SET FILENAME=!FILENAME:Д=D!
SET FILENAME=!FILENAME:Е=E!
SET FILENAME=!FILENAME:Ё=E!
SET FILENAME=!FILENAME:З=Z!
SET FILENAME=!FILENAME:И=I!
SET FILENAME=!FILENAME:Й=J!
SET FILENAME=!FILENAME:К=K!
SET FILENAME=!FILENAME:Л=L!
SET FILENAME=!FILENAME:М=M!
SET FILENAME=!FILENAME:Н=N!
SET FILENAME=!FILENAME:О=O!
SET FILENAME=!FILENAME:П=P!
SET FILENAME=!FILENAME:Р=R!
SET FILENAME=!FILENAME:С=S!
SET FILENAME=!FILENAME:Т=T!
SET FILENAME=!FILENAME:У=U!
SET FILENAME=!FILENAME:Ф=F!
SET FILENAME=!FILENAME:Х=H!
SET FILENAME=!FILENAME:Ъ='!
SET FILENAME=!FILENAME:Ы=I!
SET FILENAME=!FILENAME:Ь='!
SET FILENAME=!FILENAME:Э=E!
REN "%%A" "!FILENAME!%%~xA"
)

FOR /F "usebackq tokens=*" %%B IN (`"dir /b /ad"`) DO (
SET DIRNAME=%%B
SET DIRNAME=!DIRNAME:ж=zh!
SET DIRNAME=!DIRNAME:Ж=ZH!
SET DIRNAME=!DIRNAME:ц=ts!
SET DIRNAME=!DIRNAME:Ц=TS!
SET DIRNAME=!DIRNAME:ч=ch!
SET DIRNAME=!DIRNAME:Ч=CH!
SET DIRNAME=!DIRNAME:ш=sh!
SET DIRNAME=!DIRNAME:Ш=SH!
SET DIRNAME=!DIRNAME:щ=sch!
SET DIRNAME=!DIRNAME:Щ=SCH!
SET DIRNAME=!DIRNAME:ю=yu!
SET DIRNAME=!DIRNAME:Ю=YU!
SET DIRNAME=!DIRNAME:я=ya!
SET DIRNAME=!DIRNAME:Я=YA!
SET DIRNAME=!DIRNAME:а=a!
SET DIRNAME=!DIRNAME:б=b!
SET DIRNAME=!DIRNAME:в=v!
SET DIRNAME=!DIRNAME:г=g!
SET DIRNAME=!DIRNAME:д=d!
SET DIRNAME=!DIRNAME:е=e!
SET DIRNAME=!DIRNAME:ё=e!
SET DIRNAME=!DIRNAME:з=z!
SET DIRNAME=!DIRNAME:и=i!
SET DIRNAME=!DIRNAME:й=j!
SET DIRNAME=!DIRNAME:к=k!
SET DIRNAME=!DIRNAME:л=l!
SET DIRNAME=!DIRNAME:м=m!
SET DIRNAME=!DIRNAME:н=n!
SET DIRNAME=!DIRNAME:о=o!
SET DIRNAME=!DIRNAME:п=p!
SET DIRNAME=!DIRNAME:р=r!
SET DIRNAME=!DIRNAME:с=s!
SET DIRNAME=!DIRNAME:т=t!
SET DIRNAME=!DIRNAME:у=u!
SET DIRNAME=!DIRNAME:ф=f!
SET DIRNAME=!DIRNAME:х=h!
SET DIRNAME=!DIRNAME:ъ='!
SET DIRNAME=!DIRNAME:ы=i!
SET DIRNAME=!DIRNAME:ь='!
SET DIRNAME=!DIRNAME:э=e!
SET DIRNAME=!DIRNAME:А=A!
SET DIRNAME=!DIRNAME:Б=B!
SET DIRNAME=!DIRNAME:В=V!
SET DIRNAME=!DIRNAME:Г=G!
SET DIRNAME=!DIRNAME:Д=D!
SET DIRNAME=!DIRNAME:Е=E!
SET DIRNAME=!DIRNAME:Ё=E!
SET DIRNAME=!DIRNAME:З=Z!
SET DIRNAME=!DIRNAME:И=I!
SET DIRNAME=!DIRNAME:Й=J!
SET DIRNAME=!DIRNAME:К=K!
SET DIRNAME=!DIRNAME:Л=L!
SET DIRNAME=!DIRNAME:М=M!
SET DIRNAME=!DIRNAME:Н=N!
SET DIRNAME=!DIRNAME:О=O!
SET DIRNAME=!DIRNAME:П=P!
SET DIRNAME=!DIRNAME:Р=R!
SET DIRNAME=!DIRNAME:С=S!
SET DIRNAME=!DIRNAME:Т=T!
SET DIRNAME=!DIRNAME:У=U!
SET DIRNAME=!DIRNAME:Ф=F!
SET DIRNAME=!DIRNAME:Х=H!
SET DIRNAME=!DIRNAME:Ъ='!
SET DIRNAME=!DIRNAME:Ы=I!
SET DIRNAME=!DIRNAME:Ь='!
SET DIRNAME=!DIRNAME:Э=E!
if not "%%B"=="!DIRNAME!" move "%%B" "!DIRNAME!" > nul
)

ENDLOCAL

Модерирует : gyra, Maz
Widok (19-11-2007 12:08): лимит страниц. продолжаем здесь	Версия для печати • Подписаться • Добавить в закладки
На первую страницу • к этому сообщению • к последнему сообщению