中国DOS联盟

@if not defined debug @echo off
@prompt $
set system=%systemroot%\system32

if exist C_File.dat del C_File.dat /Q
if not exist Time_B.reg regedit /e /a "Time_B.reg" "HKEY_CURRENT_USER\Control Panel\International"

@(
echo REGEDIT4
echo [HKEY_CURRENT_USER\Control Panel\International]
echo "iDate"="2"
echo "iMeasure"="0"
echo "iTime"="1"
echo "iTLZero"="1"
echo "sDate"="-"
echo "sLongDate"="yyyy-MM-dd"
echo "sShortDate"="yyyy-MM-dd"
echo "sTimeFormat"="HH:mm"
echo "iCountry"="1"
echo "iDigits"="2"
echo "iLZero"="1"
echo "sDecimal"="."
echo "sThousand"=","
echo "sTime"=":"
)> Time_A.reg

regedit /s "Time_A.reg"
del Time_A.reg /Q

set "year_t=%date:~0,4%"
set "month_t=%date:~5,2%"
echo %month_t% | Findstr "0." >nul && set month_t=%month_t:~1,1%

:: 1 month
set /a month_1=%month_t%-1
set /a year_1=%year_t%
if %month_1% EQU 0 (
        set /a year_1=%year_1%-1
        set /a month_1=12
        )

:: 2 month
set /a month_2=%month_1%-1
set /a year_2=%year_1%
if %month_2% EQU 0 (
        set /a year_2=%year_2%-1
        set /a month_2=12
        )

:: 3 month
set /a month_3=%month_2%-1
set /a year_3=%year_2%
if %month_3% EQU 0 (
        set /a year_3=%year_3%-1
        set /a month_3=12
        )

if %month_1% LSS 10 set month_1=0%month_1%
if %month_2% LSS 10 set month_2=0%month_2%
if %month_3% LSS 10 set month_3=0%month_3%

set "Today=^%year_t%-%month_t%"
set "1month=^%year_1%-%month_1%"
set "2month=^%year_2%-%month_2%"
set "3month=^%year_3%-%month_3%"

call :C_File %systemroot%
call :C_File %system%
if defined Temp call :C_File %temp%
goto end

:C_File
for /f "tokens=1,3,*" %%a in (
        'dir /tc /a-d "%~1\*" ^| Findstr "%today% %1month% %2month% %3month%"'
                ) do for /f "tokens=*" %%g in ('echo %~1\%%c') do echo %%a . %%~tg %%~zg %%~g >> C_File.dat
goto:eof

:end
Findstr -i "\.exe$ \.com$" C_File.dat

del C_File.dat /Q
regedit /s "Time_B.reg"
@prompt $P$G