Hola lejaro2003.
Supongo que por ahí habrá más de un ocx o dll para hacer esto, pero también lo puedes lograr de una forma muy sencilla usando la función
Shell con el mandato correspondiente. Por ejemplo:
Usando pkzip:
Shell "C:\Ruta\pkzip.exe -a archivo.zip archivo.xxx"
Tal como hace el asistente de empaquetado y distribución de VB
SHELL "C:\ARCHIVOS DE PROGRAMA\MICROSOFT VISUAL STUDIO\VB98\WIZARDS\PDWIZARD\MAKECAB.EXE /f ""proyecto.DDF"""
(por supuesto sustituye el path de vb por el que corresponda) y deberás crear u obtener de alguna forma el archivo DDF. Aquí tienes un ejemplo de un fichero DDF:
.OPTION EXPLICIT
.Set Cabinet=off
.Set Compress=off
.Set MaxDiskSize=1457664
.Set ReservePerCabinetSize=6144
.Set DiskDirectoryTemplate=".."
.Set CompressionType=MSZIP
.Set CompressionLevel=7
.Set CompressionMemory=21
.Set CabinetNameTemplate="nombre_*.CAB"
"Setup.Lst"
"setup.exe"
.Set Cabinet=on
.Set Compress=on
"archivo.dll"
"MSVBVM60.DLL"
"OLEAUT32.DLL"
"OLEPRO32.DLL"
"ASYCFILT.DLL"
"STDOLE2.TLB"
"COMCAT.DLL"
"VB6ES.DLL"
"MSCOMCTL.OCX"
"MSCMCES.DLL"
"MSFLXGRD.OCX"
"FLXGDES.DLL"
"SETUP1.EXE"
"VB6STKIT.DLL"
"ST6UNST.EXE"
Suerte.
