19/05/2023: A causa di un errore sono stati cancellati, insieme ad account creati da bot, alcuni account legittimi. Si prega di leggere qui: https://www.gambas-it.org/smf/index.php?topic=9733.0
Public Sub Main() Dim z As New Compress Dim f As String For Each f In ["/home/gian/file1.txt", "/home/gian/file2.txt", "/home/gian/file3.txt"] With z .Type = "zlib" .File(f, f & ".zip", z.Max) End With NextEnd
A me funziona benissimo:.......Certo che se uno dopo home non mette il nome dell'user la vedo dura