sd2951811 发表于 2010-4-26 14:31:08

求VBS压缩文件和解压缩文件代码!

比如我在D:\test
下面有10个txt文件,文件名分别为1.txt   2.txt   3.txt依次类推
有没有可以实现的vbs脚本。先把它们压缩,然后再解压缩?
非常紧急。请帮帮忙!

TIB 发表于 2010-4-26 16:49:29

可以调用WinRAR的命令行来实现

sd2951811 发表于 2010-4-26 16:53:10

用了个浆糊办法,先创建了10个txt文件。然后用vbs调用rar命令来创建了

Haereticus 发表于 2010-4-26 16:56:36

Set objWsh = CreateObject("Wscript.shell")
'压缩
objWsh.Run "winrar a D:\test\test.rar D:\test\*.txt",0,True
'解压缩
objWsh.Run "winrar x -o+ D:\test\test.rar *.txt D:\test\",0,True
Set objWsh = Nothing

bounty 发表于 2010-4-27 11:17:46

怎样解压到当前文件

发现这样解压后,再打开这个解压文件夹,里面的路径包括了整个路径,怎样能始这个解压文件夹一打开就是那几个.txt呢

Haereticus 发表于 2010-4-27 11:42:45

这个你可以查winrar的帮助文档,当前文件夹应该是最后一个参数为空
页: [1]
查看完整版本: 求VBS压缩文件和解压缩文件代码!