Hak Cipta (c) RCDMK 2012 <[email protected]>
Izin dengan ini diberikan, tanpa dipungut biaya, kepada siapa pun yang memperoleh salinan perangkat lunak ini dan file dokumentasi terkait "Perangkat Lunak"), untuk menangani Perangkat Lunak tanpa batasan, termasuk namun tidak terbatas pada hak untuk menggunakan, menyalin, memodifikasi, menggabungkan, mempublikasikan, mendistribusikan, mensublisensikan, dan/atau menjual salinan Perangkat Lunak, dan mengizinkan orang yang menerima Perangkat Lunak untuk melakukan hal tersebut, dengan tunduk pada ketentuan berikut:
Pemberitahuan hak cipta di atas dan pemberitahuan izin ini akan disertakan dalam semua salinan atau sebagian besar Perangkat Lunak.
PERANGKAT LUNAK INI DISEDIAKAN "APA ADANYA", TANPA JAMINAN APA PUN, TERSURAT MAUPUN TERSIRAT, TERMASUK NAMUN TIDAK TERBATAS PADA JAMINAN KELAYAKAN UNTUK DIPERDAGANGKAN, KESESUAIAN UNTUK TUJUAN TERTENTU, DAN TIDAK ADA PELANGGARAN. DALAM KEADAAN APA PUN PENULIS ATAU PEMEGANG HAK CIPTA TIDAK BERTANGGUNG JAWAB ATAS KLAIM, KERUSAKAN ATAU TANGGUNG JAWAB LAINNYA, BAIK DALAM TINDAKAN KONTRAK, HUKUM ATAU LAINNYA, YANG TIMBUL DARI, DARI ATAU SEHUBUNGAN DENGAN PERANGKAT LUNAK ATAU PENGGUNAAN ATAU HAL-HAL LAIN DALAM PERANGKAT LUNAK.
Sertakan file kelas di halaman yang diinginkan dan buat instance kelasnya
dim zip
set zip = new aspZip
Buka file ZIP (buat atau buka file yang ada di disk)
zip.OpenArchieve("pathtofile.zip") ' this creates the archieve if it doesn't exists
Tambahkan beberapa file atau folder
zip.Add("..src")
zip.Add(".default.asp")
Tulis file ke disk
zip.CloseArchieve()
Jika Anda ingin mengekstrak konten file ZIP, gunakan metode ExtractTo(DestinationPath)
zip.ExtractTo(".test")
Jika arsip tidak berisi file, maka arsip tersebut akan dihapus saat objek dimusnahkan.
Catatan:
Dalam rilis saat ini (0.4) masalah dengan mengekstraksi hanya struktur direktori harus diselesaikan, namun waktu pemrosesan sekarang jauh lebih lama, karena menunggu pembuatan direktori. Waktu tunggu tambahan minimum adalah 500 ms.