Сообщения: 53173
Благодарности: 15430
|
Профиль
|
Отправить PM
| Цитировать
amel27, gora, я бы сделал так:
Код:
@Echo Off
SetLocal EnableExtensions EnableDelayedExpansion
For /F "Tokens=1* Delims==" %%i In ('WMIC Path Win32_LocalTime Get /Value ^| Find "="') Do (
Set V=%%j
Set $%%i=!V:~0,-1!
)
If "%$DayOfWeek%"=="0" Set $DayOfWeek=7
For /F "Tokens=%$Month%" %%i In ("Январь Февраль Март Апрель Май Июнь Июль Август Сентябрь Октябрь Ноябрь Декабрь") Do Set $MonthName=%%i
For /F "Tokens=%$DayOfWeek%" %%i In ("Понедельник Вторник Среда Четверг Пятница Суббота Воскресенье") Do Set $DayOfWeekName=%%i
Echo --------------------------------------
Echo День : %$Day%
Echo Месяц : %$MonthName% (%$Month%-й месяц года)
Echo Год : %$Year%
Echo --------------------------------------
Echo День недели : %$DayOfWeekName% (%$DayOfWeek%-й день недели)
Echo Квартал : %$Quarter%
Echo --------------------------------------
Echo Часов : %$Hour%
Echo Минут : %$Minute%
Echo Секунд : %$Second%
Echo --------------------------------------
Pause>nul
Exit
- один вызов WMIC;
- исправление DayOfWeek (чтобы воскресенье было 7-м днем);
- удаление последнего символа (непонятного, типа возврат каретки) из переменных;
- на WeekInMonth забил (потому что воскресенье по их стандартам считается началом недели).
|
Последний раз редактировалось Petya V4sechkin, 15-04-2009 в 15:35.
Отправлено: 15:07, 15-04-2009
| #14
|