@echo offrem 無法保證在中、英之外的其它語言的操作系統上得到正確結果for /f "delims=" %%a in ('reg query "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate') do (  set "RegDateOld=%%a")set RegDateOld=%RegDateOld:~-8%reg add "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate /t REG_SZ /d yyyy-M-d /f>nulset Today=%date: =%reg add "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate /t REG_SZ /d %RegDateOld% /f>nulset "Week=Mon Tue Wed Thu Fri Sat Sun 星期一 星期二 星期三 星期四 星期五 星期六 星期日"for %%a in (%Week%) do (  call set "Today=%%Today:%%a=%%")echo,%Today%pause

@echo offfor /f "delims=" %%a in ('reg query "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate') do (  set "RegDateOld=%%a")set RegDateOld=%RegDateOld:~-8%reg add "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate /t REG_SZ /d yyyy-M-d /f>nulset Today=%date: =%reg add "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate /t REG_SZ /d %RegDateOld% /f>nulif "%Today:~0,1%" gtr "9" (  set Today=%Today:~-10%) else (  set Today=%Today:~0,10%)echo,%Today%pause

@echo offfor /f "delims=" %%a in ('reg query "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate') do (  set "RegDateOld=%%a")set RegDateOld=%RegDateOld:~-8%reg add "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate /t REG_SZ /d yyyy-M-d /f>nultype nul>"%temp%/MyFile.tmp"for /f %%a in ('dir "%temp%/MyFile.tmp" ^| findstr /i "MyFile.tmp"') do (  set Today=%%a)reg add "HKEY_CURRENT_USER/Control Panel/International" /v sShortDate /t REG_SZ /d %RegDateOld% /f>nulecho,%Today%pause

@echo offfor /f "tokens=2 delims==" %%a in ('wmic path win32_operatingsystem get LocalDateTime /value') do (  set t=%%a)set Today=%t:~0,4%-%t:~4,2%-%t:~6,2%echo,%Today%pause

@echo off>"%temp%/DateCalculate.vbs" echo dt=date()>>"%temp%/DateCalculate.vbs" echo s=right(year(dt),4) ^& "-" ^& right("0" ^& month(dt),2) ^& "-" ^& right("0" ^& day(dt),2)>>"%temp%/DateCalculate.vbs" echo wscript.echo sfor /f %%a in ('cscript /nologo "%temp%/DateCalculate.vbs"') do set (  Today=%%a)echo,%Today%pause

@echo offrem 需要保證注冊表編輯器沒有處于鎖定狀態regedit /e "%temp%/bak.reg" "HKEY_CURRENT_USER/Control Panel/International">"%temp%/new.reg" echo REGEDIT4>>"%temp%/new.reg" echo,>>"%temp%/new.reg" echo [HKEY_CURRENT_USER/Control Panel/International]>>"%temp%/new.reg" echo "sShortDate"="yyyy-MM-dd"regedit /s "%temp%/new.reg"set Today=%date: =%regedit /s "%temp%/bak.reg"if "%Today:~0,1%" gtr "9" (  set Today=%Today:~-10%) else (  set Today=%Today:~0,10%)echo,%Today%pause 

 @echo offfor /f "tokens=6,8 delims== " %%a in ('^(echo a100^&echo mov ah^,2a^&echo int 21^&echo.^&echo p 2^&echo q^)^|debug^|find "CX"') do (  set /a y=0x%%a  set md=%%b)set /a m=0x%md:~,2%set /a d=0x%md:~-2%set m=0%m%set d=0%d%set Today=%y%-%m:~-2%-%d:~-2%echo,%Today%pause