Hi guys,
I'm new to VB6 and I've to zip and unzip a folder (containing many files & subfolders). I've already read many threads about it but I couldn't find the correct answer to my problem.
This is what I done:
- I put the zip32.dll, Unzip32.dll & CGZipLibrary.dll into the Windows\System32 folder.
- I made the reference in Microsoft VB
- I wrote my code:
... but when I execute the program it doesn't work correctly... It creates the right file in the right directory, but it doesn't compress the right folder! If I open the zip files it contains the compressed folder: \Programs\Microsoft Visual Studio\ VB98 istead of C:\Cerere!!!Code:Dim oZip As CGZipFiles Set oZip = New CGZipFiles oZip.ZipFileName = "C:\temp\ZIP" oZip.RecurseFolders = True oZip.RootDirectory = "C:\Cerere" oZip.AddFile "*" If oZip.MakeZipFile <> 0 Then MsgBox oZip.GetLastMessage End If Set oZip = Nothing
Why?????




Reply With Quote