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

回答