Board logo

标题: [已结]怎么自动搜索QQ的路径并复制一个程序进去运行 [打印本页]

作者: AKC     时间: 2008-10-1 21:19    标题: [已结]怎么自动搜索QQ的路径并复制一个程序进去运行

小弟想做个随身的U盘QQ登陆程序,主程序好了,可我不知道怎么自动复制到别人电脑的QQ目录下运行,求版主大大指教啊! (要设置QQ的变量吗?) 谢谢各位的帮助哈,不过怎么实现把程序考进QQ的目录呢?(我的意思是能否启动一次BAT程序就实现将文件拷贝进QQ的目录里并运行) 这命令行不?
copy e:\1.txt %QQPath%
用tireless兄的
echo off
reg export HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ tmp.orz
more tmp.orz>tmp2.orz
for /f "skip=3 delims== tokens=2" %%o in (tmp2.orz) do set qqpath=%%o
copy e:\1.txt %qqpath:\\=\%
del tmp*.orz
pause
显示文件名、目录或卷标语法不正确 [ Last edited by HAT on 2008-12-5 at 22:52 ]

作者: hackate     时间: 2008-10-1 22:08
@echo off for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ /v Install') do ( set QQPathL=%%a set QQPathR=%%b ) set QQPath=%QQPathL:~-1%:%QQPathR% echo %QQPath% pause 这个代码是获取QQ的安装目录啊。

作者: tireless     时间: 2008-10-1 22:54
--------------------- [ Last edited by tireless on 2008-10-3 at 19:30 ]

作者: tireless     时间: 2008-10-1 23:20
奇怪,执行:
for /f "skip=4 tokens=2*" %a in ('reg query HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ /v Install') do @echo %b
得到的结果是 D:\Program Files\深度 DEEPQ 而正确的路径是 D:\Program Files\深度 DEEPQQ\ 为什么? [ Last edited by tireless on 2008-10-1 at 23:27 ]

作者: 23112656     时间: 2008-10-2 03:36
for /f "skip=4 tokens=2*" %a in ('reg query HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ /v Install') do @echo %b 少了SP3补丁.装上就没问题了.以前我也遇到过. reg对中文识别好像不健全.是HAT大哥告诉我的. [ Last edited by 23112656 on 2008-10-2 at 03:39 ]

作者: tireless     时间: 2008-10-2 11:01
在命令提示符下,reg query 显示的结果是完整的。 而将 reg query 的结果输出到文件就会少字符。。 [ Last edited by tireless on 2008-10-4 at 12:30 ]

作者: tireless     时间: 2008-10-4 12:00
只能先把注册表导出。
@echo off
reg export HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\QQ qq_.tmp
for /f "delims== tokens=2" %%o in ('more qq_.tmp^|find /i "install"') do set qqpath=%%o
COPY E:\1.TXT %qqpath:\\=\%
del qq_.tmp

作者: HAT     时间: 2008-10-4 12:42
XP SP2中文版的reg.exe有bug,当reg query遇到中文字符时可能会"吃字符",详见www.cn-dos.net/forum ... 解决方案如下: 1. 用XP SP2以上的版本的操作系统(XP SP3/2003/Vista等,XP SP2英文版也可)中的reg.exe来替换XP SP2中文版的reg.exe 2. 调用VBS读注册表,并把返回结果传递给BAT 3. 用reg export把注册表项导出到一个临时文件,再搜索该文件,值得注意的是reg export导出的文件是Unicode编码格式,可以使用type命令进行处理

作者: exzzz     时间: 2008-12-5 17:26
不如用下面这个咯,说不定你有好几个QQ呢,也或者是用的绿色版的没有注册表路径呢? 那就开着QQ运行下面的批处理吧。 echo off title 这个程序可显示内存中正运行的程序“QQ.EXE”的路径 cls for /f "delims==" %%a in ('wmic process where caption^="qq.exe" get CommandLine^|find "QQ.exe"') do set qqpath=%%a set qqpath=%qqpath:~1,-11% echo %qqpath% pause set qqpath

作者: 5551551     时间: 2008-12-5 19:30
Originally posted by exzzz at 2008-12-5 05:26 PM: 不如用下面这个咯,说不定你有好几个QQ呢,也或者是用的绿色版的没有注册表路径呢? 那就开着QQ运行下面的批处理吧。 echo off title 这个程序可 ...
这位兄弟批处理变量用得活灵活现的

作者: HAT     时间: 2008-12-5 20:03    标题: Re 9楼

如果人家没有运行QQ咋办呢,呵呵。

作者: ZJHJ     时间: 2008-12-5 22:14
@echo off for %%f in (C D E F G H I J K L M N O P) do ( for /f %%i in ('dir %%f:\qq.exe /a /b /s') do set qq=%%i ) start %qq%

作者: ooaf     时间: 2008-12-5 22:32
彩虹QQ补丁 绿色版 好像不用运行qq 也能找到qq 的路径, 是最后一次运行qq 的路径, 不知咋原理?

作者: ZJHJ     时间: 2008-12-5 22:44
这个符合要求不?
@echo off
for %%f in (C D E F G H I J K L M N O P) do (
for /f %%i in ('dir %%f:\qq.exe  /a  /b /s') do @echo %%i>qq.txt
)
for /f "delims=" %%a in ('findstr /n .*  qq.txt') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:qq.exe=!
    echo.!var!>qqdz.txt
         endlocal
)
del qq.txt
for /f %%i in (qqdz.txt) do set qqdz=%%i
copy e:\1.txt  %qqdz%
del qqdz.txt
start %qqdz%\1.txt
[ Last edited by ZJHJ on 2008-12-5 at 22:46 ]

作者: bluewaterx     时间: 2008-12-6 09:32
绿色版的QQ也可以识别,只要运行一次,注册表中就有路径存在 @echo off setlocal enabledelayedexpansion for /f "skip=4 delims=" %%i in ('reg query HKEY_CLASSES_ROOT\CLSID\{2D616D8F-F1BA-43A1-BEF0-E2A82A0FBD56}\LocalServer32 /ve 2^>nul') do set qqPath=%%i&set qqPath=!qqPath:~14!&set tmpVar=0&call :subPathChange "!qqPath!" echo !qqPath!&pause&exit :subPathChange if !tmpVar! equ 0 set tmpVar=1&set qqPath=%~fs1&call :subPathChange "!qqPath!" set qqPath=%~dp1 goto :eof

作者: kaikai163     时间: 2008-12-11 11:52
学习了,条条大路通罗马,可是哪条路最近,最好走,值得大家去考虑!