Ciao a tutti
Ho la necessità di fare un programmino che mi comprima dei file di una determinata cartella, il primo passo è questo:
Dim openmyfile As Process
Dim destinazione As String
Dim origine As String
origine = User.Home &/ "MieFoto3/*.*"
destinazione = User.Home &/ "gino.tar.gz"
openmyfile = Shell "tar zcvf " & destinazione & " " & origine
Però succede che i file vengono salvati con il percorso, cioè dentro il pacchetto i file sono in: "/home/pierino/MieFoto3".
Anche scompattando da terminale, "tar zxvf prova.tar.gz" mi va a creare nella home una nuova home con tutti i percorsi dove va a mettere il file.
Io avrei il bisogno di di salvare solo i file, e di scomprimerli in una determinata cartella.
grazie per l'aiuto
Ciao a tutti
Ho la necessità di fare un programmino che mi comprima dei file di una determinata cartella, il primo passo è questo:
Dim openmyfile As Process
Dim destinazione As String
Dim origine As String
origine = User.Home &/ "MieFoto3/*.*"
destinazione = User.Home &/ "gino.tar.gz"
openmyfile = Shell "tar zcvf " & destinazione & " " & origine
Però succede che i file vengono salvati con il percorso, cioè dentro il pacchetto i file sono in: "/home/pierino/MieFoto3".
Anche scompattando da terminale, "tar zxvf prova.tar.gz" mi va a creare nella home una nuova home con tutti i percorsi dove va a mettere il file.
Io avrei il bisogno di di salvare solo i file, e di scomprimerli in una determinata cartella.
grazie per l'aiuto
Dim openmyfile As Process
Dim destinazione As String
Dim origine As String
origine = User.Home &/ "MieFoto3/*.*"
destinazione = User.Home
nome_file = "gino.tar.gz"
openmyfile = Shell "cd " & destinazione & ";tar zcvf " & nome_file & " " & origine
Ciao Cesko!
Dim openmyfile As Process
Dim destinazione As String
Dim origine As String
Dim nome_file As String
origine = User.Home &/ "MieFoto3/*.*"
destinazione = User.Home
nome_file = "gino.tar.gz"
openmyfile = Shell "cd " & destinazione & ";tar zcvf " & nome_file & " " & origine
no, continua a scrivere tutto il percorso.
ad ogni modo a me basterebbe di estrarla in una determinata cartella, è che così va a scrivere e creare tutte le cartelle che ha memorizzato
è giusto cesko, bastava cambiare le opzioni del tar.
Come al solito andando a vedere nei sorgenti di gambas, in questo caso quello dell'ide si trova tutto. Nell'ide "progetto/crea/pacchetto sorgenti" c'è la soluzione.
per comprimere:
Dim openmyfile As Process
Dim origine As String
Dim nome_file As String
Dim filedacomprimere As String
filedacomprimere = "*.*"
origine = User.Home &/ "prova/"
nome_file = User.Home &/ "gino.tar.gz"
openmyfile = Shell "cd " & origine & "; tar cfvhz " & nome_file & " " & filedacomprimere
per scomprimere:
Dim openmyfile As Process
Dim destinazione As String
Dim nome_file As String
destinazione = User.Home &/ "prova/"
nome_file = User.Home &/ "gino.tar.gz"
openmyfile = Shell "cd " & destinazione & ";tar zxvf " & nome_file
grazie a tutti