Code: Select all
Debug PackEntryName(#dCZipFileNo)
If UncompressPackFile(#dCZipFileNo,#dCTmpFolder+PackEntryName(#dCZipFileNo),PackEntryName(#dCZipFileNo))
Debug PackEntryName(#dCZipFileNo)
Thanks,
Simon