Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Получение значения дня недели из имеющейся даты 
Author Message
Tol!k



PostPosted: Sun May 13, 2012 01:05    Post subject: Reply with quote

Code:
@echo off &setlocal enableextensions &chcp 866 >nul
::   Параметры: "файл с датами.txt"

>"%temp%\Weekday.vbs" echo WScript.Echo WeekDayName(Weekday(WScript.Arguments(0)),True)

for /f "usebackq" %%d in ("%~1") do (
   for /f %%a in ('cscript /nologo "%temp%\Weekday.vbs" %%d') do call :chcp %%d %%a
)
move /y "%temp%\Weekday.tmp" "%~1"
goto :eof

:chcp
chcp 1251 >nul
echo %1 %2>>"%temp%\Weekday.tmp"
chcp 866 >nul
goto :eof
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group