منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ممكن حل لمشكله في كود - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ممكن حل لمشكله في كود (/showthread.php?tid=17277)



ممكن حل لمشكله في كود - medoddd - 12-09-16

بسم الله الرحمن الرحيم
PHP كود :
   DeleteFilesFromFolder(TextBox4.Text)
 
       End If
 
       ExTractZipFile() 

اريد المساعده في كود 
ايرور يوجد في extract zip file


RE: ممكن حل لمشكله في كود - Abu Ehab - 12-09-16

    ExTractZipFile ا   هذة  دالة   أو بالاصح Function     عاملها  مبرمج  ما 
 والخطا   أنك عملت نسخ ولصق للكود   بدون علمك لمحتوياته


RE: ممكن حل لمشكله في كود - أبو عمر - 13-09-16

صحيح
هي function
PHP كود :
Sub DeleteFilesFromFolder(Folder As String)
 
   If Directory.Exists(FolderThen
        For Each _file 
As String In Directory.GetFiles(Folder"*.pdf")
 
           File.Delete(_file)
 
       Next
        For Each _folder 
As String In Directory.GetDirectories(Folder)
 
           DeleteFilesFromFolder(_folder)
 
       Next
    End 
If
End Sub 

لكن في المثال اعلاه تستخدم لحذق كافة ملفات pdf في مجلد يتم تعينه عند استدعاء الوظيفة
معاناة لكن ربك يكتب الاجر