+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : DotNetZip (/showthread.php?tid=22700)
DotNetZip - Abu Ehab - 25-11-17
السلام عليكم
يا مبرمجين البيسك الكرام :
ضفط ملف بأستحدام DotNetZip
نزلها من خلال NuGet Package Manager
PHP كود :
Dim zipFileName As String = "MyZipFile.zip"
Dim fileNames As String() = Directory.GetFiles(txtStorageDirectory.Text)
Using zip As Ionic.Zip.ZipFile = New Ionic.Zip.ZipFile
For Each file In fileNames
zip.AddFile(file)
Next
zip.Save(zipFileName)
End Using
يعطيكم العافية