Hello, thank you for your answer...
You are saying that all i have to do is change:
Sub ZipIt(file,zip)
Set oShell = WScript.CreateObject("WScript.Shell")
oShell.Run "winzip32 -m " & zip & " " & file
End Sub
by
Sub ZipIt(file,zip)
Dim oExec
Set oShell =...
Hello
Congratz for the forum, is very organized and helpful.
I have this program, search on folders and subfolders(only 2 levels of folders) and zip files to the zipfile with a similar name.
But because i have files with 50mb and others with 2,5Gb sometimes my program opens more than 1 winzip...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.