入力元ZIPファイルを解凍とともに空にするWSH。
┌──────────────────────────────────────┐
│Set objShell = CreateObject("Shell.Application")                            │
│Set inputZip = objShell.NameSpace(入力元ZIPファイル).items                  │
│Set outputFolder = objShell.NameSpace(出力先フォルダ)                       │
│outputFolder.MoveHere inputZip                                              │
└──────────────────────────────────────┘
「outputFolder.CopyHere」を「outputFolder.MoveHere」に変更すればよい。