复制当前日期前一天的所有文件源码

背景：帮群内一位哥们儿写的，用时2个多小时。

特点：

1.支持图标拖拽和窗口拖拽功能。 

2.支持复制文件名日志报告。

源码如下：

@echo off&setlocal enabledelayedexpansion&title 复制当前日期前一天的所有文件
if "%~1"=="" (
	set /p a=请拖拽需要操作的文件夹到此窗口,按回车键继续：
	echo.
	for /f "delims=" %%a in ('dir /od !a!^|findstr /n "%date%"') do (
		set b=%%a
		for /f "delims=:" %%a in ("!b!") do (
			set /a b=%%a-5&goto a
			:a
			for /f "delims=" %%a in ('dir /b !a!') do set /a c+=1&if "!c!"=="!b!" (
				goto c
				) else (
				md copy 2>nul
				copy !a!\%%a copy>nul|echo 已复制 %%a 到 copy 文件夹。
				)
				)
		)
			)
		)
	)

echo.
set a=%~1
for /f "delims=" %%a in ('dir /od !a!^|findstr /n "%date%"') do (
	set b=%%a
	for /f "delims=:" %%a in ("!b!") do (
		set /a b=%%a-5&goto b
		:b
		for /f "delims=" %%a in ('dir /b !a!') do set /a c+=1&if "!c!"=="!b!" (
			goto c
			) else (
			md copy 2>nul
			copy !a!\%%a copy>nul|echo 已复制 %%a 到 copy 文件夹。
			)
		)
	)

:c
echo.
set /p=sussess.

图标拖拽：

窗口拖拽：

复制日志报告：

图标拖拽日志报告：

窗口拖拽日志报告：