我在网络服务器上有一个名为“dump”的文件夹。每天会在该文件夹中保存许多临时文件和文件夹。
我想要删除这些文件和子文件夹。条件是我只希望删除一小时之前的文件和文件夹，即在运行批处理文件时的当前时间之前一小时。
这意味着我想要在该文件夹中保留一小时的文件以运行其他活动，就像当前时间一样。
我认为在这种情况下，最好使用PowerShell或WSH（正如Rihan Meij所提到的）。比较日期和时间是可能的，但非常脆弱（因为没有办法在批处理中获取一个文化中立的日期/时间）。你可以编写类似于以下代码：
setlocal enableextensions
set Now=%date%
set NowTime=%time:~0,-3%
call :tokenize_date %Now%
call :tokenize_time %NowTime%
echo %YEAR%-%MONTH%-%DAY%T%HOUR%:%MINUTE%:%SECOND%
call :one_hour_before %Now% %NowTime%
echo %RESULT_DATE% %RESULT_TIME%
ping -n 1 -w 1500 ::1>NUL
set Now2=%date%
set NowTime2=%time:~0,-3%
call :date_time_compare %Now% %NowTime% %Now2% %NowTime2%
echo %Now%T%NowTime% compared to %Now2%T%NowTime2%: %RESULT%
endlocal
goto :eof
:tokenize_date
rem assuming ISO 8601 date format YYYY-MM-DD
setlocal enableextensions
set arg=%1
set YEAR=%arg:~0,4%
set MONTH=%arg:~5,2%
set DAY=%arg:~8,2%
endlocal&set YEAR=%YEAR%&set MONTH=%MONTH%&set DAY=%DAY%
goto :eof
:tokenize_time
rem assuming ISO-8601 time format HH:MM:SS, 24-hour
setlocal enableextensions
set arg=%1
set HOUR=%arg:~0,2%
set MINUTE=%arg:~3,2%
set SECOND=%arg:~6,2%
endlocal&set HOUR=%HOUR%&set MINUTE=%MINUTE%&set SECOND=%SECOND%
goto :eof
:one_hour_before
rem gets a date as %1 and a time as %2
rem returns a date in RESULT_DATE and a time in RESULT_TIME
setlocal enabledelayedexpansion enableextensions
set months=31 28 31 30 31 30 31 31 30 31 30 31
set i=0
for %%x in (%months%) do (
set /a i+=1
set month_length_!i!=%%x
)
call :tokenize_date %1
call :tokenize_time %2
set /a HOUR-=1
if %HOUR% LSS 0 (
set /a DAY-=1
set /a HOUR+=24
if %DAY% LSS 0 (
set /a MONTH-=1
if %MONTH% LSS 0 (
set /a YEAR-=1
set /a MONTH+=12
)
set /a DAY+=month_length_!MONTH!
)
)
endlocal&set RESULT_DATE=%YEAR%-%MONTH%-%DAY%&set RESULT_TIME=%HOUR%:%MINUTE%:%SECOND%
goto :eof
:date_time_compare
rem expects %1 - date 1, %2 - time 1, %3 - date 2, %4 - time 2
rem returns a value < 0 if datetime1 is earlier than datetime2
rem > 0 later than
rem = 0 equal to
rem the return value is saved in the variable %RETURN%
setlocal enableextensions
call :tokenize_date %3
call :tokenize_time %4
set YEAR2=%YEAR%
set MONTH2=%MONTH%
set DAY2=%DAY%
set HOUR2=%HOUR%
set MINUTE2=%MINUTE%
set SECOND2=%SECOND%
call :tokenize_date %1
call :tokenize_time %2
if %YEAR2% GTR %YEAR% (endlocal&set RESULT=-1&goto :eof) else (
if %YEAR2% LSS %YEAR% (endlocal&set RESULT=1&goto :eof) else (
if %MONTH2%%DAY2%%HOUR2%%MINUTE2%%SECOND2% GTR %MONTH%%DAY%%HOUR%%MINUTE%%SECOND% (
endlocal&set RESULT=-1&goto :eof
) else (
if %MONTH2%%DAY2%%HOUR2%%MINUTE2%%SECOND2%==%MONTH%%DAY%%HOUR%%MINUTE%%SECOND% (
endlocal&set RESULT=0&goto :eof
) else (
endlocal&set RESULT=1&goto :eof
)
)
)
)
goto :eof
抱歉，内容有点长。日期/时间比较目前只进行了部分测试，但应该可以正常工作。当时间包含子秒时要小心，因为这会在此处引入逗号，从而干扰调用子例程的参数顺序（因此使用%time:~0,-3%来避免这种情况）。
之后，您可以使用%~tI扩展来获取日期和时间，将它们与当前时间减去一小时进行比较，并在适当的情况下删除。
注意1：我假设使用ISO 8601日期和时间格式，采用24小时制，这是我在这里使用的。对于非标准日期格式，您需要稍微修改子例程（但12小时制可能会很麻烦）。
注意2：目前代码不考虑闰年。我认为，在:one_hour_before中再加上5或6行代码即可解决。
for %r in (*.*) DO echo %r "created on" %~tr
这将产生：
C:\>echo BOOTSECT.BAK "created on" 2009/02/17 11:59 PM
BOOTSECT.BAK "created on" 2009/02/17 11:59 PM
C:\>echo config.sys "created on" 2006/09/18 11:43 PM
config.sys "created on" 2006/09/18 11:43 PM
我认为更可能的情况是使用Windows脚本宿主或PowerShell，但你没有提到这些选项是否可行，所以我假设有一个很好的理由不能使用这些技术。