一个查找硬盘上指定修改日期可执行文件并改名的批处理脚本

最近中了威金变种，把机器上的可执行文件感染了一大半，整个DOS脚本，根据文件修改日期自动把可能被感染的文件扩展名改掉：

@echo off
setlocal enabledelayedexpansion
@rem for /f "delims=" %%a in ('dir /s/b/a-d H:\*.exe') do (
@rem for /f "delims=" %%a in ('dir /s/b/a-d I:\*.exe') do (
for %%a in (d e f g h i J k l m o p q r s t u v w x y z) do if exist %%a:\ for /F "delims=" %%b in ('dir /s/b/a-d %%a:\*.exe') do (
  echo 正在处理 %%a 盘……
  set num=%%~tb
  echo %%~tb
  set num=!num:~0,10!
  set num=!num:-=!
  @rem if !num! geq 20100823 echo %%b^(中毒^)
  if !num! geq 20100823 (
    echo %%b
    (set fn=%%~nxb)&(ren "%%~fb" "!fn:~1!^(中毒^)")
  )

)
pause