VBScript解压缩zip文件的文件夹名称

我可以使用下面的代码解压缩文件。VBScript解压缩zip文件的文件夹名称

sUnZipFolder = ABC.zip 

set sFilesInZip = objShell.NameSpace(sZipFileNamePath).items 
objShell.NameSpace(sUnZipFolder).CopyHere(sFilesInZip)

我该如何计算出提取的文件夹的名称？

例如：Zip文件名是ABC.zip，ABC文件中包含一个名为XYZ的文件夹。在我解压ABC.zip之后。如何捕获文件夹名称XYZ？ XYZ文件夹名称每月更改，因为它是一个每月下载下载的服务包。

2016-11-10 danster

这是你的代码，缩短了一点到IMO。如果这些文件是zip文件的一部分，这些文件应位于'UnZipFolder'和子文件夹中 – LotPings

由于某种原因，您不能使用sFilesInZip(0)，但可以枚举它以查找该文件夹。

for each x in sFilesInZip 
    folder = x 
next 
msgbox folder

2016-11-11 00:35:36 FloatingKiwi

sUnZipFolder的名称与其中的文件夹不同。例如：Zip文件名是ABC.zip，ABC文件夹中包含一个名为XYZ的文件夹。解压缩ABC.zip后，如何捕获文件夹名称XYZ？ XYZ文件夹名称每月更改，因为它是一个每月下载下载的服务包。 – danster

我明白你的意思了。我修改了解决方案。 – FloatingKiwi

谢谢！谢谢你的提示！ – danster

回答