[注册表类] 注册表_查询信息的归类整理批处理问题

locoman

reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall，可以在注册表中查看已安装的软件信息。

但，我是想：将所安装的软件信息进行归纳整理成如下格式输出并保存到d:\softlist.txt中。

"DisplayName"="360杀毒"
"DisplayVersion"="5.0.0.8170"
"InstallLocation"="C:\\Program Files\\360\\360sd"

DisplayName"="360安全卫士"
"DisplayVersion"="13.0.0.1002"
"InstallLocation"="C:\\Program Files\\360\\360Safe"

"DisplayName"="腾讯QQ"
"DisplayVersion"="9.4.5.27743"
"InstallLocation"="C:\\Program Files\\Tencent\\QQ\\"

请教：要实现这个需求，该怎么办？谢谢大神帮助指导！！

locoman

谢谢您，我测试后再看看。

newswan

回复 5# locoman


    for 之外，1个 ">"

set list="360杀毒  360压缩  360安全卫士  winrar"

set _P_="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
for /f "usebackq tokens=*" %%a in (`reg query %_P_%`) do (
    set DisplayName=
    set DisplayVersion=
    set InstallLocation=
    for /f "usebackq tokens=1,2,*" %%a in (`reg query "%%a"`) do (
        if "%%a" == "DisplayName" set DisplayName="%%c"
        if "%%a" == "DisplayVersion" set DisplayVersion="%%c"
        if "%%a" == "InstallLocation" set InstallLocation="%%c"
    )
    if defined DisplayName (
        echo !DisplayName! | findstr /i %list% >null && (
            echo #
            echo DisplayName=!DisplayName!
            echo DisplayVersion=!DisplayVersion!
            echo InstallLocation=!InstallLocation!
        )
    )
)
复制代码

locoman

回复 4# newswan


    完美
谢谢您不怨其烦的帮助！谢谢您！

最后掉了一个>，应该是 >> 11.txt，不然就只能记录最后一项信息。

——那么，再延伸的请教学习一下：
如果，我只想查询记录某几个安装软件的信息呢，该怎么修改？
比如：我只想查询记录“360杀毒”、“360压缩”、“360安全卫士”，这三个。

DisplayName=360杀毒
DisplayVersion=5.0.0.8170
InstallLocation=C:\Program Files\360\360sd
#
DisplayName=360压缩
DisplayVersion=4.0.0.1270
InstallLocation=C:\Program Files\360\360zip
#
DisplayName=360安全卫士
DisplayVersion=13.0.0.2001
InstallLocation=C:\Program Files\360\360Safe

抓住机会顺便就此向您多学习一招哟！！

newswan

标准的 bat 方法

@echo off
setlocal ENABLEDELAYEDEXPANSION

set _P_="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
for /f "usebackq" %%a in (`reg query %_P_%`) do (
    for /f "usebackq tokens=1,2,*" %%a in (`reg query %%a`) do (
        if "%%a" == "DisplayName" set DisplayName=%%c
        if "%%a" == "DisplayVersion" set DisplayVersion=%%c
        if "%%a" == "InstallLocation" set InstallLocation=%%c
    )
    echo #
    echo DisplayName=!DisplayName!
    echo DisplayVersion=!DisplayVersion!
    echo InstallLocation=!InstallLocation!
) > 11.txt
复制代码

locoman

回复 2# newswan


    谢谢您的热情指导和帮助！！
第一个方案，测试成功，基本实现了需求目标。

唯一不足的是：生成结果栏目不是完全一致的，看起来有点不舒服，如：
DisplayName="Kyocera Product Library"
InstallLocation="C:\\Program Files\\Kyocera"
DisplayVersion="3.3.2111"
#
DisplayVersion="1.0.0.0"
InstallLocation=""
DisplayName="Intel(R) Management Engine Components"

明显的：上段的DisplayName=排在第一行，下段的DisplayName=排在了最后一行了。
可能注册表中原始的信息本来排列就不一致。

还有晕的是：win7中不自带sed命令，win10有自带的sed内部命令！

newswan

sed 4.8 -e 连接使用，有问题

set _P_="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
reg query %_p_% /s | sed -r -e "/^HK| DisplayName| DisplayVersion| InstallLocation/!d" >11.txt
sed -r -e "s/^HK.*/#/" -e "s/^ +//"  -e "s/ +REG_SZ */=""/" -e "/\w/s/$/""/" -i 11.txt
sed -r -e "s/([\])/\1\1/g" -e "/#/{ N ; /\w/!D } " -i 11.txt
复制代码

powershell

$P="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
(reg query $p /s ) -match "^HKEY|^ {4}DisplayName|^ {4}DisplayVersion|^ {4}InstallLocation" -replace "^HK.*","#" -join "`n" -replace "#(`n#)+","#" -split "`n" -replace "^ +","" -replace " +REG_SZ *",'="' -replace "(?<=[^#])$",'"' ' -replace "(\\)","`$1`$1"
复制代码