标题: [求助]查找本地QQ目录中由数字组成的目录名 [打印本页]
作者: 9zhenzhi9 时间: 2009-3-17 00:06 标题: [求助]查找本地QQ目录中由数字组成的目录名
@echo off
setlocal enabledelayedexpansion
set disk=cdefghijklmnopqrstuvwxyz
FOR /L %%i IN (0,1,23) DO (
Call set driver=%%disk:~%%i,1%%
dir /b /s !driver!:\qq.exe &&!driver!:&&for /r . %%a in (.) do (@if exist %%a\QQ.exe @echo %%a>>c:\qqMULU.txt)
)
@echo ***********************>>c:\qqshu.txt
for /f %%q in (c:\qqMULU.txt) do (
set /p dpath=<%%q"
cd !dpath!
pause
for /d %%w in (*) do @echo %%w>>c:\qqshu.txt
@echo ********欢迎使用*********>>c:\qqshu.txt
findstr "^[0-9]*$" c:\qqshu.txt>>c:\qqshu.txt
)
自写批处理无法通过？
1.查找QQ路径
2.查找路径下目录名
3.挑选出由数字组成的目录名，写入文本中。
请高手指教。
作者: moniuming 时间: 2009-3-17 02:02
@echo off
for /f %%a in ('dir /b/ad "%programfiles%\tencent\qq\*"') do (
echo.%%a|findstr "^[0-9]*$"
)
pause
for /f %%a in ('dir /b/ad "%programfiles%\tencent\qq\*"') do (
echo.%%a|findstr "^[0-9]*$"
)
pause
作者: 523066680 时间: 2009-3-17 02:31
哈哈 网吧这边的放在d盘 。。。
而系统盘是在c盘 so ....
整个全盘的吧。
[ Last edited by 523066680 on 2009-3-17 at 02:33 ]
作者: moniuming 时间: 2009-3-17 02:53
回exist:
那就查注册表吧:
@echo off
for /f "tokens=2*" %%a in ('reg query "hklm\software\tencent\qq"^|find /i "install"') do (set "qqpth=%%b")
for /f %%a in ('dir /b/ad "%qqpth%\*"') do (
echo.%%a|findstr "^[0-9]*$"
)
pause
for /f "tokens=2*" %%a in ('reg query "hklm\software\tencent\qq"^|find /i "install"') do (set "qqpth=%%b")
for /f %%a in ('dir /b/ad "%qqpth%\*"') do (
echo.%%a|findstr "^[0-9]*$"
)
pause
作者: 9zhenzhi9 时间: 2009-3-17 04:17 标题: 谁可以照我的思路改进一下，谢谢
@echo off
setlocal enabledelayedexpansion
set disk=cdefghijklmnopqrstuvwxyz
FOR /L %%i IN (0,1,23) DO (
Call set driver=%%disk:~%%i,1%%
dir /b /s !driver!:\qq.exe>>c:\qqMULU.txt)
)
for /f "delims=*" %%q in (c:\qqMULU.txt) do (
set p=%%~pq
set "c=%%~dq"
!c!
cd !p!
pause
for /d %%w in (*) do (
echo %%w|findstr "^[0-9]*$">>c:\qqshu.txt)
)
pause
可否照此思路改进一下，使其不用生成临时文本，来存储路径？
[ Last edited by 9zhenzhi9 on 2009-3-17 at 04:20 ]
作者: 26933062 时间: 2009-3-17 04:35
@echo off&set "QQpath="
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%"
if exist "%QQPath%.\QQ.exe" (
for /f "delims=" %%a in ('dir/b/ad "%QQPath%"^|findstr /v "[^0-9]"')do echo %QQPath%%%a
)
pause
[ Last edited by 26933062 on 2009-3-17 at 04:37 ]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%"
if exist "%QQPath%.\QQ.exe" (
for /f "delims=" %%a in ('dir/b/ad "%QQPath%"^|findstr /v "[^0-9]"')do echo %QQPath%%%a
)
pause
作者: tireless 时间: 2009-3-17 08:29
@echo off
reg export HKLM\SOFTWARE\TENCENT\QQ tmp.reg >nul
for /f "skip=3 tokens=1,* delims==" %%a in ('type tmp.reg') do (
dir /ad/b "%%~fb"|findstr "^[0-9]*$"
pause & del tmp.reg & exit /b
)
reg export HKLM\SOFTWARE\TENCENT\QQ tmp.reg >nul
for /f "skip=3 tokens=1,* delims==" %%a in ('type tmp.reg') do (
dir /ad/b "%%~fb"|findstr "^[0-9]*$"
pause & del tmp.reg & exit /b
)
作者: zerayro 时间: 2009-4-5 05:11
最上面那句是什么意思？