@echo off
setlocal enabledelayedexpansion
set /p rq=请输入要复制的文件的最后修改日期（如20150101）：
for /f "skip=1 tokens=1-4 delims= " %%a in ('dir /tw /a-d^|find ":"') do (
set wdate=%%a
if "!wdate:~0,4!!wdate:~5,2!!wdate:~8,2!" equ "%rq%" (
::复制文件到指定文件夹
copy "%%d" "E:\123\"
)
)
pause
