獲取文件更新列表 批處理

rem 文件更新列表批處理
cls
title 楓龍聯(lián)邦 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%\