Dim zipPath As String = "DOSYA_YOLU"
Bunu fonksiyonun 4. satırındaki kodla değiştirin ama fonksiyonu amacından saptırırsınız ve tek dosya yolunu almasına neden olur, sanırım hazır bir kod kullanıyorsunuz buna ek olarak bir fonksiyon yazmalısınız.
bu dilin c# olduğundan emin misiniz bana daha çok vb.net gibi geldi ama