VBS如何解压带密码的RAR压缩文件？

xiewei120120

想使用VBS脚本来解压带密码的压缩文件c:123.rar 到当前文件夹 解压密码为123

求教给出代码,rar解压软件安装盘未知

sgaizxt001

1. @echo off
   
2. for %%a in (c d e f) do (
   
3.   for /f "delims=" %%b in ('dir /s /b /a-d %%a:\WinRAR.exe') do set str="%%~fb"
   
4. )
   
5. start "" %str% e -p123 c:\123.rar *.*
   
6. pause

复制代码

很慢，因为需要去查找winrar

xiewei120120

原帖由 sgaizxt001 于 2010-6-17 21:58 发表
@echo off
for %%a in (c d e f) do (
  for /f "delims=" %%b in ('dir /s /b /a-d %%a:\WinRAR.exe') do set str="%%~fb"
)
start "" %str% e -p123 c:\123.rar *.*
pause很慢，因为需要去查找winrar

是的感觉超慢,并运行找不到文件能不能改进下,像RAR文件不外是在C:\Program Files和D:\Program Files

sgaizxt001

if /i exist "c:\program files\winrar\winrar.exe" start "" "c:\program files\winrar\winrar.exe" e -p123 c:\123.rar *.*
if /i exist "d:\program files\winrar\winrar.exe" start "" "d:\program files\winrar\winrar.exe" e -p123 c:\123.rar *.*

用if exist来判断winrar是否存在。代码我没测试

xiewei120120

原帖由 sgaizxt001 于 2010-6-17 23:16 发表
if /i exist "c:\program files\winrar\winrar.exe" start "" "c:\program files\winrar\winrar.exe" e -p123 c:\123.rar *.*
if /i exist "d:\program files\winrar\winrar.exe" start "" "d:\program files\winra ...

特别感谢仁兄已解决

slore

晕……

直接从rar的关联去找不好么？