中国DOS联盟

@echo off
for /f "tokens=2,*" %%i in ('reg query "HKLM\SOFTWARE\TENCENT\QQ" /v "Install"') do (
set QQ=%%j
)
echo 本机QQ目录位于 %QQ%
pause

参照本论坛其他朋友关于 收藏夹 的解决方法修改的

@ECHO OFF
reg export "HKLM\SOFTWARE\TENCENT\QQ" QQ.reg /nt4>nul
findstr /i "Install" QQ.reg >nul && goto right || goto wrong

:wrong
echo.
echo 这台机器没有安装QQ
echo.
pause>nul
goto :eof

:right
for /f "tokens=2,*" %%i in ('reg query "HKLM\SOFTWARE\TENCENT\QQ" /v "Install"') do (
set QQdir=%%j
)
echo.
echo QQ路径为：%QQdir%
pause>nul
goto :eof

@echo off &setlocal enabledelayedexpansion
for /f "tokens=1,2,*" %%i in ('reg query "HKLM\SOFTWARE\TENCENT\QQ" ^| find /i "Install"') do ( goto right)

:wrong
echo.
echo 这台机器没有安装QQ
pause>nul
goto :eof

:right
for /f "tokens=2,*" %%i in ('reg query "HKLM\SOFTWARE\TENCENT\QQ" /v "Install"') do (
set QQdir=%%j
)
echo.
echo QQ路径为：%QQdir%
pause>nul
goto :eof

@echo off

::要执行的注册表查询命令

set REG_QUERY_COMMAND=reg query "HKLM\SOFTWARE\TENCENT\QQ" /v "Install"



%REG_QUERY_COMMAND% 1>nul 2>&1

if errorlevel 1 (

  echo 本机没有安装 QQ2008 及更低版本

  goto eof

) else (

  setlocal enabledelayedexpansion

  set "ching="

  ::根据 reg query 命令输出的特殊格式，才能知道哪个部分是显示数据的，并据此判断

  for /f "tokens=2,*" %%i in ('%REG_QUERY_COMMAND%') do (

    set "ching=%%j"

  )

  if "!ching!"=="" (

    echo 查询的值为空。

    goto eof

  ) else (

    goto task

  )

  endlocal

)



:task

for /f "tokens=2,*" %%i in ('%REG_QUERY_COMMAND%') do (

  set QQ=%%j

)

echo 本机QQ目录位于 %QQ%



:eof

echo.

echo ===我是华丽的 KOF ===

pause>nul

exit