F18

znači u većini slučajeva imamo situaciju da trebamo:

• zipovati jedan fajl (neki eksport fajl ili slično)
• zipovati više fajlova (neki prenosi)

tako da trebamo jednostavnu mogućnost

zip_file( zip_fajl, fajl_za_zipovanje )

što znači:

zip_file( "c:/test/test.zip", "c:/documents and settings/vsasa/my documents/test.odt" )

to će nam na lokciju c:/test napraviti fajl test.zip

druga mogućnost je zipovanja grupe fajlova

zip_files( zip_fajl, { fajlovi_za_zipovanje } )

što znači:

 fajlovi := { "c:/test/test1.txt", "c:/test/test2.txt", "c:/test/test3.txt", ... }

 zip_files( "c:/test/test.zip", fajlovi )

E sada, funkcija

zip_file()

gubi smisao u tome što će i zip_files() uraditi isto ako se u matrici nađe samo jedan fajl

I evo, to bi ga bilo ovo:

zip_files()

Ostaje još informacija o tome da li je zip uspio ili ne...

commit: obrada greške

Evo i funkcije za unzip fajlova

unzip_files()

Jedino što nisam skontao kako extraktovati na željenu lokaciju !!????

Koliko vidim uvijek ga ekstrakture tamo gdje se nalazi sam zip fajl.

Dobro, funkcije nisam testirao unutar F18, pisao sam ih nasuho... i F18 se bilda.

Saša Vranić je napisao/la:

Jedino što nisam skontao kako extraktovati na željenu lokaciju !!????

Koliko vidim uvijek ga ekstrakture tamo gdje se nalazi sam zip fajl.

commit

Mislim da će ovo riješiti taj problem, ali naravno, treba probati.

commit

Dodao u "zip_files" relativnu putanju argument

zip_files( zip_path, zip_name, files{}, relative_path[.t. ili def. .f.] )

Naime, na veznom tiketu uočio da se fajlovi proslijeđeni sa punim putanjama tako i arhiviraju, pa se onda dekompresijom takav path i ekstraktuje...

Ostavio sam sada ovo kao argument, ako bi slučajno zatrebalo, ali po defaultu je da se ne upisuje relativna putanja.