VB detecta un problema con el archivo comprimido rar

Para escribir, el proceso de uso completo es bastante largo (consulte C:\Program

Files\Winrar\Rar.txt

47,855

bytes para describir la línea de comando de RAR)

En resumen

Const

WinRAR

=

"C:\Program/

Files/Winrar/"

'Dirección de instalación de Winrar, igual que (p>

Const

Ruta1

=

"c://1.txt"

'El archivo a comprimir, si la ruta tiene espacios , rodeado por dos pares de comillas dobles

Const

Path2

=

"c:\2.txt"

'El archivo a comprimir, igual que el anterior

Const

RarPath

=

"c:\3 .rar"

'El nombre del archivo comprimido generado, igual que arriba

Privado

Sub

Command1_Click()

Shell

WinRAR

amp;

"rar.exe

a

"

amp;

RarPath

amp;

"

"

amp ;

"

amp;

"

"

amp;

Ruta2

Fin

Sub.