解压缩VBS

Question

我有this个VBS用于解压缩文件：

Set args = Wscript.Arguments

outputDirectory = WScript.Arguments.Item(0)
zipFile = WScript.Arguments.Item(1)

rem On Error Resume Next

Set fso = CreateObject("Scripting.FileSystemObject")
If NOT fso.FolderExists(outputDirectory) Then
fso.CreateFolder(outputDirectory)
End If
set objShell = CreateObject("Shell.Application")
set FilesInZip=objShell.NameSpace(zipFile).items
objShell.NameSpace(outputDirectory).CopyHere(FilesInZip)
Set fso = Nothing
Set objShell = Nothing

rem On Error Goto 0

问题是，当我从.bat运行它时：

%zip_vbs_path% "%cd%\%zip_temp_dir%\" "%cd%\%OUTPUT_DIR%\!zip_plugin_name_!"

其中：

• %zip_vbs_path是所说VBS的路径
• %zip_temp_dir% = zip_temp
• %OUTPUT_DIR%\!zip_plugin_name_! = Output\PluginName.jar

我收到此错误：

提交答案时，请ELIF，因为我根本不熟悉VBS语言。

Answer 1

对于这一行：

set FilesInZip=objShell.NameSpace(zipFile).items

您已将zipFile设置为：

Output\PluginName.jar

您使用的代码应该适用于zip个文件，但Shell.Application无法从jar文件中检索文件集。