Board logo

标题: VBS如何解压带密码的RAR压缩文件? [打印本页]

作者: xiewei120120    时间: 2010-6-17 21:04     标题: VBS如何解压带密码的RAR压缩文件?

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

求教给出代码,rar解压软件安装盘未知
作者: sgaizxt001    时间: 2010-6-17 21:58

  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    时间: 2010-6-17 22:57

原帖由 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    时间: 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\winrar\winrar.exe" e -p123 c:\123.rar *.*

用if exist来判断winrar是否存在。代码我没测试
作者: xiewei120120    时间: 2010-6-25 18:28     标题: 已解决

原帖由 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    时间: 2010-7-31 12:45

晕……

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




欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2