زیپ کردن پوشه خاص

[mkabir 186]

سلام دوستان من از کتابخونه abzipunzip  استفاده کردم ولی انگار تو آدرس دهی مشکل دارم اگر بخوام پوشه Databases داخل پوشه WhatsApp  که در حافظه گوشی وجود داره زیپ کنم باید چیکار کنم ؟؟

[محمدرضا شاهپیری 5,579]

Dim zip As ABZipUnzip

zip.ABZipDirectory(File.DirRootExternal&"WhatsApp/Databases",File.DirRootExternal&"/whatsapp.zip")

 

[mkabir 186]

سلام دوباره 

Dim zip As ABZipUnzip zip.ABZipDirectory(File.DirRootExternal&"WhatsApp/Databases",File.DirRootExternal&"/whatsapp.zip")

این کارو میکنم ولی وقتی برنامه اجرا میشه force stop  میده فایل هم ایجاد میشه انگار وسط کار هنگ میکنه 

[shahrokhnazari 110]

zip.ABZipDirectory(File.DirRootExternal&"/gggggg/",File.DirRootExternal&"/ggggg.zip")