[Ace] WinzipIT
Simple code to zip/unzip with Winzip
AI
AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Source Code
'--------- 'WinZipIT '--------- Function winZipit(ByVal source As String, ByVal target As String, ByVal zip As Boolean) zipIT = App.Path & "winzip32 -a" unzipIT = App.Path & "winzip32 -e " If zip = True Then Shell (zipIT & target & source) Else: Shell (unzipIT & target & source) End If End Function
Original Comments (3)
Recovered from Wayback Machine