获取文件更新列表 批处理

rem 文件更新列表批处理 
cls 
title 枫龙联邦 CopyRight2006 
rem "==================================================" 
For /r %%i in (.) DO del %%i\最新文件目录.txt 
del 备查目录.txt 
del 完整目录.txt 
set homes=%date% 
date/t >>完整目录.txt 
for /F %%A in (完整目录.txt) do set homes=%%A 
md %homes%& 
dir /t:c /s>完整目录.txt 
for /f "tokens=1,4* delims= " %%1 in (完整目录.txt) do for /r %%a in (%%2*) do if %%1==%homes% echo %%~fa >>最新文件目录.txt 
For /r %%i in (*.*) DO echo %%~fi >>备查目录.txt 
copy 最新文件目录.txt %homes%&\