https://foro.gambas-es.org/viewtopic.php?f=5&t=7969
-----------------------------------
tincho
Jueves, 16 Abril 2020, 02:24

Comprimir Varios Archivos Y Directorios
-----------------------------------
Hola a todos.
Estoy intentando generar un archivo .zip con el contenido de un directorio en el que hay archivos y mas directorios, pero no lo consigo.
Estoy usando este código

[code linenumbers=false syntax=gambas]
  Dim z As New Compress
  Dim f As String

  For Each f In ["/home/file1.txt", "/home/file2.txt", "/home/fileN.txt"]
  With z
    .Type = "zlib"
    .File(f, User.Home &/ "tmp.zip", z.Max)
  End With
  Next
[/code]

Antes usaba un script bash pero me gustaría poder hacerlo con gambas sin tener que recurrir a la terminal.
Gracias
Saludo.


-----------------------------------
vuott
Jueves, 16 Abril 2020, 05:36

Re: Comprimir Varios Archivos Y Directorios
-----------------------------------
Uhmmm... no se si es posible  :| , ya que la guía dice que "[i] If that file already exists, it will be overwritten.[/i]"


-----------------------------------
tincho
Jueves, 16 Abril 2020, 11:47

Re: Comprimir Varios Archivos Y Directorios
-----------------------------------
[quote user="vuott" post="47936"]Uhmmm... no se si es posible  :| , ya que la guía dice que "[i] If that file already exists, it will be overwritten.[/i]"[/quote]
 :x 
Bueno, hace un momento comente esto en el bugtracker a ver si es posible ampliar este componente.
Saludos.


-----------------------------------
vuott
Jueves, 16 Abril 2020, 14:10

Re: Comprimir Varios Archivos Y Directorios
-----------------------------------
[quote user="tincho" post="47937"] hace un momento comente esto en el bugtracker a ver si es posible ampliar este componente.[/quote]
Ok, si no podrás usar... los recursos del la función externa [i]Libzip[/i]:  :roll: 

   https://www.gambas-it.org/wiki/index.php?title=Comprimere_un_file_in_un_file_compresso_.zip_mediante_le_funzioni_esterne_del_API_di_libzip


saludos


