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
  • 25,048
  • 4
  • 23
  • 41
RunA
  • 1

0 Answers0