回 帖 发 新 帖 刷新版面

主题:VB如何读取QQ2009路径?

VB如何读取QQ2009路径? 
 2008的可以通过注册表··但是09的不行了··
     
    高手帮忙···给出代码谢谢···

回复列表 (共3个回复)

沙发

???

板凳

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{052CFB79-9D62-42E3-8A15-DE66C2C97C3E}下的InstallLocation键

3 楼

Public Function GetQQPath() As String '获取QQ安装路径
On Error Resume Next
Dim WSH

Set WSH = CreateObject("WScript.Shell")

GetQQPath = WSH.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ\Install")

GetQQPath = GetQQPath

End Function

我来回复

您尚未登录,请登录后再回复。点此登录或注册