
CODE: [Copy to clipboard]大家的兴趣与支持让我又做了点完善(07/10/26 第二次修改):@echo off
title 注册表扫描中...
mode con cols=50 lines=10
for /f "tokens=3 delims=\" %%i in ('reg query HKLM\SOFTWARE') do (
echo 当前扫描信息: HKLM\SOFTWARE\%%i
>>reglist.txt echo ================================================================
>>reglist.txt echo 软件名称:%%i
>>reglist.txt echo
================================================================
if not "%%i"=="Classes" for /f "tokens=4 delims=\" %%j in ('reg query HKLM\SOFTWARE\%%i 2^>nul') do (
echo 软件信息: %%j>>reglist.txt)
)
echo 扫描完毕!
ping 127.0>nul
reglist.txt
CODE: [Copy to clipboard][ Last edited by PPdos on 2007-10-26 at 12:18 AM ]@echo off
mode con cols=50 lines=10
setlocal enabledelayedexpansion
set PPdos=HKLM HKCU
>%temp%\reglist.txt echo %DATE%%time% 注册表扫描报告
for %%h in (%PPdos%) do (
title 正在扫描: %%h 项
for /f "tokens=3 delims=\" %%i in ('reg query "%%h\SOFTWARE"') do (
echo 当前扫描信息: %%h\SOFTWARE\%%i
>>%temp%\reglist.txt echo ================================================================
>>%temp%\reglist.txt echo 软件名称:%%i
>>%temp%\reglist.txt echo ================================================================
if not "%%i"=="Classes" if not "%%i"=="Microsoft" for /f "tokens=4 delims=\" %%j in ('reg query %%h\SOFTWARE\%%i 2^>nul') do (
echo 软件信息: %%j>>%temp%\reglist.txt
for /f "tokens=* delims=" %%k in ('reg query "%%h\software\%%i\%%j" /S^|findstr /c:"REG_SZ" ') do (
set /a n+=1
cls
echo 已扫描项值: !n! 当前信息: %%j
echo 关联文件信息:%%k>>%temp%\reglist.txt )
)
)
)
)
>>%temp%\reglist.txt echo 提示:如需保存结果请将文件另存 BY PPdos
title FINISHED&echo 扫描完毕!
ping 127.0>nul
start %temp%\reglist.txt
CODE: [Copy to clipboard]@echo off
title 注册表扫描中...
mode con cols=50 lines=10
setlocal enabledelayedexpansion
>%temp%\reglist.txt echo %DATE%%time% 注册表扫描报告
for /f "tokens=3 delims=\" %%i in ('reg query HKLM\SOFTWARE') do (
echo 当前扫描信息: HKLM\SOFTWARE\%%i
>>%temp%\reglist.txt echo ================================================================
>>%temp%\reglist.txt echo 软件名称:%%i
>>%temp%\reglist.txt echo ================================================================
if not "%%i"=="Classes" if not "%%i"=="Microsoft" for /f "tokens=4 delims=\" %%j in ('reg query HKLM\SOFTWARE\%%i 2^>nul') do (
echo 软件信息: %%j>>%temp%\reglist.txt
for /f "tokens=* delims=" %%k in ('reg query "hklm\software\%%i\%%j" /S^|findstr /c:"REG_SZ" ') do (
set /a n+=1
cls
echo 已扫扫描项值: !n! 当前信息: %%j
echo 关联文件信息:%%k>>%temp%\reglist.txt )
)
)
)
>>%temp%\reglist.txt echo 如需保存结果请选择文件另存为 BY PPdos
title FINISHED&echo 扫描完毕!
ping 127.0>nul
start %temp%\reglist.txt
附件 1:软件注册表信息查询.rar (2007-1-23 09:50, 666 bytes, 下载附件所需积分 1 点 ,下载次数: 203)
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |