baza450,
Код:
![Выделить весь код](images/misc/selectcode.png)
@Echo Off
Del /F /Q "%~dp0_Uninstall.log" 2>nul
For /F "Tokens=*" %%A In ('Reg Query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall" /s^|Find /i "HKEY_"') Do (
For /F "Tokens=2*" %%B In ('Reg Query "%%A" /v DisplayName 2^>nul^|Find /i "REG_SZ"') Do Echo:%%C>>"%~dp0_Uninstall.log"
)
Notepad "%~dp0_Uninstall.log"