安裝文件分析工具(批處理bat) FOR WIN7



聲明：本人水平有限，歡迎批評指正，禁止用於非法用途，請保持代碼純淨和完整

工具說明：工具根據文件添加時間分析安裝了哪些文件，可能會有漏報和誤報，可以通過查看日誌文件和文件列表文件更正

更新：測試環境win7，修改了一個時間判斷的bug

@echo off
setlocal enabledelayedexpansion
echo 安裝文件分析工具
echo.
echo make by humors221
echo.
set /p input=請輸入安裝包完整路徑(帶後綴):
echo.
set /p where=請輸入待分析路徑(驅動或目錄):
echo.
echo 開始記錄!
echo.
set tmpstart=%time:~0,5%
set startTime=%date:~0,10% !tmpstart: =0!
echo 開始時間:!startTime!
set startTime=!startTime:/=!
set startTime=!startTime: =!
set startTime=!startTime::=!
echo.
start /wait %input%
set tmpend=%time:~0,5%
set endTime=%date:~0,10% !tmpend: =0!
echo.
echo 結束時間:!endTime!
echo.
echo 結束記錄!
set endTime=!endTime:/=!
set endTime=!endTime: =!
set endTime=!endTime::=!
echo.
echo 開始分析%where%目錄
echo.
set dire=
set file=
set total=0
set isOk=0
set fullPath=
set idx=1
echo.>日誌.txt
echo.>文件列表.txt
for /f "tokens=*" %%d in ('dir /AD /S /B "%where%"') do (
echo.
echo 分析%%d目錄...
echo 分析%%d目錄...>>日誌.txt
set dire=%%d
call :fil
)
echo 共!total!個文件>>文件列表.txt
echo 分析完畢！請查看日誌“日誌“文件或”文件列表“文件
pause
exit

:fil
for /f "tokens=*" %%f in ('dir /A-D /B /O-D /TA "!dire!"') do (
echo.
echo 分析%%f文件...
echo 分析%%f文件...>>日誌.txt 
set file=%%f
set idx=1
set fullPath=!dire!\!file!
call :info
if !isOk! EQU -1 (
exit /b
)
)

:info
for /f "tokens=1,2,* delims= " %%a in ('dir /O-D /TA "!fullPath!"') do (
if !idx! EQU 4 (
set dt=%%a %%b
set cmpdt=%%a %%b
set cmpdt=!cmpdt:/=!
set cmpdt=!cmpdt: =!
set cmpdt=!cmpdt::=!
if "!cmpdt!" GEQ "!startTime!" (
if "!cmpdt!" LEQ "!endTime!" (
echo 添加了!fullPath!文件,時間!dt!...>>文件列表.txt
set isOk=0
set /a total+=1
exit /b
) else (
echo !fullPath!不是添加的文件，時間!dt!...>>日誌.txt
set isOk=0
exit /b
)
) else (
echo !fullPath!不是添加的文件，時間!dt!...>>日誌.txt
set isOk=-1
exit /b
)
)
set /a idx+=1
)