Compress.File (gb.compress)
Sub File ( Source As String, Target As String [ , Level As Integer ] )
Une fois que vous avez sélectionné le pilote de compression, vous pouvez compresser un fichier et placer le résultat dans un autre fichier en utilisant cette méthode.
-
Source: chemin du fichier source (fichier à compresser).
-
Target: chemin du fichier cible (fichier compressé). If ce fichier existe déjà, il sera écrasé.
-
Level: niveau de compression, une valeur qui peut être comprise entre valeur Min et valeur Max. Si vous ne passez pas ce paramètre, la valeur par défaut sera employée.
Exemples
...
Dim Cp As New Compress
Cp.Type = "zlib"
Cp.File("/home/foo/README.TXT" , "/home/foo/README.TXT.gz" , Cp.Max)
...