0

Fname-"file need to unzip"

Dest_path-"path where fles need to be Stored after unzip"

Set oApp=CreateObject ("shell.application")
For each filename in oApp(Fname).items
    oApp.namespace(Dest_path).copyhere
Next

The above code is working fine for normal zip files..

Paul Ogilvie
  • 24,620
  • 4
  • 19
  • 40
RunA
  • 1

0 Answers0