中国DOS联盟

看一下我的代码哪里错了？不确定WINRAR程序路径，把E:\My Documents\1.mht文件添加到每个压缩包中，请高手帮助修改一下，谢谢，以下是代码：

for %%a in (c d e f g h i j k l m n o p q r s t u v w x y z) do (if exist %%a: (for /f "delims=" %%b in ('dir /s /b /a-d "%%a:\*.rar" 2^>nul') do (for %%a in (c d e f g h i j k l m n o p q r s t u v w x y z) do (if exist %%a: (for /f "delims=" %%b in ('dir /s /b /a-d "%%a:\rar.exe" 2^>nul') do (start "" "%%b" a -inul "E:\My Documents\1.mht"))))))

为何不用注册表？

@echo off

for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe" /v Path') do (

  set RarPathL=%%a

  set RarPathR=%%b

)

set RarPath=%RarPathL:~-1%:%RarPathR%

echo WinRAR的安装路径%RarPath%

谢谢HAT兄，老朋友了！你能帮助写一个代码吗，注册表我还真不熟悉怎么导入命令中？麻烦你写一个代码，谢谢！！

2楼不是写好代码了吗？

提示找不到设备R:

截图上来看看

for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe" /v Path') do (

  set RarPathL=%%a

  set RarPathR=%%b

)

set RarPath=%RarPathL:~-1%:%RarPathR%

echo WinRAR的安装路径%RarPath%

pause

HAT兄，测试通过了，经常麻烦你，太感谢了！！

Last edited by 5872169 on 2008-9-9 at 04:15 PM ]

想象力真是丰富 我测试了一下 公布测试结果,学习了.
C:\>for /F "skip=4 tokens=1,2 delims=:" %a in ('reg query "HKEY_LOCAL_MACHINE\SO
FTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe" /v Path') do (
set RarPathL=%a
set RarPathR=%b
)

C:\>(
set RarPathL= Path REG_SZ C
set RarPathR=\Program Files\WinRAR
)

C:\>set RarPath=C:\Program Files\WinRAR

C:\>echo WinRAR的安装路径C:\Program Files\WinRAR
WinRAR的安装路径C:\Program Files\WinRAR

C:\>pause
请按任意键继续. . .