以下是我网上找的二段bat
第一段,win10上运行正常,运行后列出来了电脑上所有安装的大部分软件,并导出到了记事本。
@echo off&setlocal enabledelayedexpansion
set n=1
type nul>op.txt
reg export HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall reg.$ >nul
for /f "delims=" %%i in ('type reg.$ ^| findstr "DisplayName ["') do (
set foo=%%~i
set foo=!foo:HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\=!
set foo=!foo:DisplayName=!
set foo=!foo:"=!
If "!foo:~,1!"=="=" (echo/ !foo:~1!) else (
echo/!n! !foo!
set /a n+=1
)
)>>op.txt
start op.txt
exit
Acrobat Reader
Acrobat Reader DC
Acrobat Standard DC
Acrobat Pro
Acrobat Pro DC
Acrobat DC
Acrobat X (已过时)
Acrobat XI(已过时)
Reader X(已过时)
Reader XI(已过时)
...
另外更新了下之前的代码:
· 提升效率(添加多线程)
· 提升对长产品名称的支持(最大支持至4组字符,例如 Real-Time Customer Data Platform)