Cómo comprimir y descomprimir archivos en vb, es decir rar o zip, dame el código fuente, ¿a qué dll llamar?

De hecho, no es necesario llamar a la DLL en absoluto. Ahora, siempre que WinRAR esté instalado en el sistema, el directorio de instalación incluirá un software de compresión y descompresión: Rar.exe, UnRAR.exe. Utilice el shell VB para llamar. Estos dos programas admiten formatos. Hay tantos que no es necesario que reinventes la rueda, aquí tienes un código de muestra simple:

Nota: si no deseas instalar WinRAR, entonces. vaya a buscar el archivo WinRAR ya instalado, es decir, rar o zip, démelo el código fuente y llame al dll que contiene: si no desea instalar WinRAR, copie el WinRAR instalado en una de sus rutas en el computadora y luego llámelo

'C directorio raíz del disco. El archivo mydoc.docx se comprime en el archivo mydoc.docx en el directorio raíz. archivo rar

'Use rar.exe, llame al formato: rar.exe a lt; archivo zip de destino lt;

Llamar a Shell("C:\Program Files\WinRAR\rar.exe a c:\mydoc.rar c:\mydoc.docx", vbHide)

End Sub

'Extraiga los archivos en el archivo mydoc.rar del directorio raíz de la unidad C al directorio de la unidad D

'Utilice unrar.exe, llamando al formato: unrar.exe x lt archivo comprimido de origen; gt; lt; ruta de destino gt;

Private Sub Command2_Click()

Llamar a Shell("C:\Program Files\WinRAR\unrar.exe x c:\mydoc.rar d: \temp ", vbHide)

End Sub