demon1981
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
@echo off
chcp 1251>nul
for /f "tokens=1,3 delims= " %%d in ('reg query hkcu\Software\1c\1cv7\7.7\titles^|find /i "reg_sz"') do ( echo Base path:%%d
echo Basename: %%e
set word=%%e
echo Basename cyr: %word%
call :replace
echo basename in latin: %word%
call:maketime
echo Arhname: %word%%var1%.7z
echo.
ping 127.0.0>nul
)
rem reg query hkcu\Software\1c\1cv7\7.7\titles|find /i "reg_sz"
:replace
SET "word=%word:ж=zh%"
SET "word=%word:Ж=ZH%"
SET "word=%word:ц=ts%"
SET "word=%word:Ц=TS%"
SET "word=%word:ч=ch%"
SET "word=%word:Ч=CH%"
SET "word=%word:ш=sh%"
SET "word=%word:Ш=SH%"
SET "word=%word:щ=sch%"
SET "word=%word:Щ=SCH%"
SET "word=%word:ю=yu%"
SET "word=%word:Ю=YU%"
SET "word=%word:я=ya%"
SET "word=%word:Я=YA%"
SET "word=%word:а=a%"
SET "word=%word:б=b%"
SET "word=%word:в=v%"
SET "word=%word:г=g%"
SET "word=%word:д=d%"
SET "word=%word:е=e%"
SET "word=%word:ё=e%"
SET "word=%word:з=z%"
SET "word=%word:и=i%"
SET "word=%word:й=j%"
SET "word=%word:к=k%"
SET "word=%word:л=l%"
SET "word=%word:м=m%"
SET "word=%word:н=n%"
SET "word=%word:о=o%"
SET "word=%word:п=p%"
SET "word=%word:р=r%"
SET "word=%word:с=s%"
SET "word=%word:т=t%"
SET "word=%word:у=u%"
SET "word=%word:ф=f%"
SET "word=%word:х=h%"
SET "word=%word:ъ=`%"
SET "word=%word:ы=i%"
SET "word=%word:ь=`%"
SET "word=%word:э=e%"
SET "word=%word:А=A%"
SET "word=%word:Б=B%"
SET "word=%word:В=V%"
SET "word=%word:Г=G%"
SET "word=%word:Д=D%"
SET "word=%word:Е=E%"
SET "word=%word:Ё=E%"
SET "word=%word:З=Z%"
SET "word=%word:И=I%"
SET "word=%word:Й=J%"
SET "word=%word:К=K%"
SET "word=%word:Л=L%"
SET "word=%word:М=M%"
SET "word=%word:Н=N%"
SET "word=%word:О=O%"
SET "word=%word:П=P%"
SET "word=%word:Р=R%"
SET "word=%word:С=S%"
SET "word=%word:Т=T%"
SET "word=%word:У=U%"
SET "word=%word:Ф=F%"
SET "word=%word:Х=H%"
SET "word=%word:Ъ=`%"
SET "word=%word:Ы=I%"
SET "word=%word:Ь=`%"
SET "word=%word:Э=E%"
SET "word=%word: =_%"
exit /b
:maketime
for /f "tokens=1,2,3,4,5,6,7 delims=:." %%i in ("%date%.%time%") do set var1=%%k%%j%%i%%l%%m%%n%%o
echo ArchiveTime: %var1%
exit /b |
Всего записей: 189 | Зарегистр. 28-03-2007 | Отправлено: 14:31 15-01-2009 | Исправлено: demon1981, 16:54 15-01-2009 |
|
