echo off
:: 列出系统中的ActiveX组件。
if exist reg_activeX.txt erase reg_activeX.txt
for /f "tokens=1-4 delims=\" %%i in ('reg Query HKCR\CLSID\') do (
1>nul 2>&1 reg Query HKCR\CLSID\\%%k\ProgID\ && (
for /f "tokens=1-3,* skip=4" %%a in ('reg Query HKCR\CLSID\\%%k /ve 2^>nul') do (
echo.%%k %%d>>reg_activeX.txt)))
if exist reg_prog.txt erase reg_prog.txt
for /f "tokens=1-4 delims=\" %%i in ('reg Query HKCR\CLSID\') do (
1>nul 2>&1 reg Query HKCR\CLSID\\%%k\Programmable\ && (
for /f "tokens=1-3,* skip=4" %%a in ('reg Query HKCR\CLSID\\%%k /ve 2^>nul') do (
echo.%%k %%d>>reg_prog.txt)))
:: 测试...
set $add=no
if exist reg_shellfolder.txt erase reg_shellfolder.txt
for /f "tokens=1-4 delims=\" %%i in ('reg Query HKCR\CLSID\') do (
1>nul 2>&1 reg Query HKCR\CLSID\\%%k\ShellFolder\ && (
for /f "tokens=1-3,* skip=4" %%a in ('reg Query HKCR\CLSID\\%%k /ve 2^>nul') do (
echo.%%k %%d>>reg_shellfolder.txt
if @%$add%==@yes (
reg Add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\%%k /ve /d "%%d" /f ))))
::CMD for /f "tokens=1,*" %i in (reg.txt) do findstr "%i" m.txt && echo.1^>nul 2^>nul reg Add HKLM\OXX\%i /f /ve /d "%j" ^&^& echo.PASS ^|^| echo.FAIL>>mycomputer.bat
:: 把下面的系统文件夹放到我的电脑中。在桌面上打开我的电脑就能看到这些文件夹出现在磁盘列表下面。
set $subkey=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\
for %%i in (
{0DF44EAA-FF21-4412-828E-260A8728E7F1}#"Taskbar and Start Menu"
{2559a1f1-21d7-11d4-bdaf-00c04f60b9f0}#"Help and Support"
{2559a1f3-21d7-11d4-bdaf-00c04f60b9f0}#"Run..."
{2559a1f7-21d7-11d4-bdaf-00c04f60b9f0}#"Set Program Access and Defaults"
{6DFD7C5C-2451-11d3-A299-00C04F8EF6AF}#"Folder Options"
{7007ACC7-3202-11D1-AAD2-00805FC1270E}#"Network Connections"
{7A9D77BD-5403-11d2-8785-2E0420524153}#"User Accounts"
{7BD29E00-76C1-11CF-9DD0-00A0C9034933}#"Temporary Internet Files"
{D20EA4E1-3957-11d2-A40B-0C5020524153}#"Administrative Tools"
{D6277990-4C6A-11CF-8D87-00AA0060F5BF}#"Scheduled Tasks"
{FB0C9C8A-6C50-11D1-9F1D-0000F8757FCD}#"Scanners & Cameras") do (
for /f "tokens=1,2 delims=#" %%x in ("%%i") do (
1>nul 2>&1 reg Add %$subkey%%%x /ve /f /d "%%~y" && (
echo.PASS ==^> %%x) || (
echo.FAIL ==^> %%x)))
1>nul 2>&1 RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
批处理列出系统中的COM组件。
最新推荐文章于 2022-03-03 14:53:58 发布