vbs解压zip文件中所有的文件到指定目录

好的，以下是使用VBS脚本解压ZIP文件中所有文件到指定目录的代码：

Set objArgs = WScript.Arguments
zipFile = objArgs(0)
outputFolder = objArgs(1)

Set objShell = CreateObject("Shell.Application")
Set zip = objShell.NameSpace(zipFile)

If Not zip is Nothing Then
    If Not objFSO.FolderExists(outputFolder) Then
        objFSO.CreateFolder(outputFolder)
    End If

    For Each item in zip.Items
        zipFolder = outputFolder & "\" & item.Name
        If objFSO.FileExists(zipFolder) Then
            objFSO.DeleteFile(zipFolder)
        End If
        zip.CopyHere item, 16
    Next
End If

使用方法：

1. 将上面的代码保存为一个VBS脚本文件，例如extract.vbs。

2. 打开命令提示符，进入到保存脚本的文件夹。

3. 执行以下命令进行解压缩操作：

   cscript extract.vbs "待解压的zip文件路径" "解压后的目录路径"

例如：

   cscript extract.vbs "C:\Users\Administrator\Desktop\test.zip" "C:\Users\Administrator\Desktop\test"

注意事项：

- 在执行解压缩操作时，解压后的目录路径必须事先不存在，否则会报错。
- 在解压缩操作完成前，请勿关闭命令提示符窗口。