VB如何读取QQ2009路径

[复制链接]
查看11 | 回复4 | 2009-8-20 20:32:57 | 显示全部楼层 |阅读模式
'返回QQ2009安装路径Public Function GetQQ2009Path()Dim Path As StringOn Error Resume Next
Path = CreateObject("Wscript.Shell").RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ2009\Install") + "\bin\" & "QQ.exe"
GetQQ2009Path = PathEnd Function...
回复

使用道具 举报

千问 | 2009-8-20 20:32:57 | 显示全部楼层
MsgBox _
CreateObject("WScript.Shell") _
.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ\Install")...
回复

使用道具 举报

千问 | 2009-8-20 20:32:57 | 显示全部楼层
你想自动获取QQ路径对吧,也可以用api函数实现自动搜索....
回复

使用道具 举报

千问 | 2009-8-20 20:32:57 | 显示全部楼层
小子,搞破坏呀...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行