تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كود يحذف جميع الملفات بداخل المجلد
#7
وعليكم السلام ورحمة الله وبركاته

فى البداية لاتمام حذف الملفات بطريقة الحذف النهائي 
او الحذف بارسال الملف الى سلة المحذوفات فاتبع الرابط التالى

ناتى الان الى كيفية استخدام الكود الموضح بالاعلى خاصة
كود :
       Dim dirs() As System.IO.DirectoryInfo = {New System.IO.DirectoryInfo("PATH1"), New System.IO.DirectoryInfo("PATH2"), New System.IO.DirectoryInfo("PATH3")}
       For Each dr In dirs
           For Each fn As System.IO.FileInfo In dr.GetFiles
               System.IO.File.Delete(fn.FullName)
           Next
       Next

لنقول ان لدى CheckBox وظيفته مثل موافقة الشروط والاحكمام 
وهو عبارة عن عند الموافقة على الشروط سيتم حذف الملف نهائياً

هنا اليك اكثر من طريقة للاستخدام
وهو ان تجعل الـ Button من خصائصه Enabled بقيمة False
وعند تحديد علامة صح على CheckBox يقوم بتحويل الـ Button لخصائصه Enabled الى True

وهو من خلال الكود التالى
كود :
   Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
       If CheckBox1.Checked = True Then
           Button1.Enabled = True
       Else
           Button1.Enabled = False
       End If
   End Sub

الى هنا لا يوجد مشكلة الان بكده انت ليس بحاجة الى التعديل على الكود الخاص بك
طيب اذا كنت لا اريد استخدام هذه الطريقة واريد مباشر من خلال كود الـ Button

فكل ما عليك جعل الكود بهذا الشكل
كود :
       Dim dirs() As System.IO.DirectoryInfo = {New System.IO.DirectoryInfo("PATH1"), New System.IO.DirectoryInfo("PATH2"), New System.IO.DirectoryInfo("PATH3")}
       For Each dr In dirs
           For Each fn As System.IO.FileInfo In dr.GetFiles
               If CheckBox1.Checked = True Then
                   System.IO.File.Delete(fn.FullName)
               End If
           Next
       Next

اتمنى ان تكون الصورة وضحت لك كاملاً
واتمنى ان الرابط بالاعلى يفيدك ايضاً للتعامل مع حذف الملفات

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: essawq , essawq , ابو روضة


الردود في هذا الموضوع
RE: كود يحذف جميع الملفات بداخل المجلد - بواسطة elgokr - 23-09-18, 11:19 AM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  إغلاق الفورم مع حذف جميع البيانات الموجودة به صالح عبدالله 10 1,060 19-04-25, 08:54 PM
آخر رد: Kamil
  [VB.NET] مشكل ظهور Query SQLITE في إظهار جميع التواريخ b4getws 3 530 28-02-25, 10:36 AM
آخر رد: b4getws
  [VB.NET] استعراض بيانات في Datagridview واضافة جميع البيانات لجدول محدد sql skode 0 491 12-01-25, 12:50 AM
آخر رد: skode
  اريد كود يحذف جميع سجلات جدول بقاعدة بيانات اكسس دفعه واحده khalidalwdi 2 649 18-11-24, 01:02 AM
آخر رد: rdxdz
  استدعاء فورم بداخل Panil1 Abdellah 4 502 27-09-24, 01:06 AM
آخر رد: Abdellah
  [VB.NET] مساعدة في تغير لون جميع شاشة المشروع MOHAMMED ALZWI 2 497 29-08-24, 02:33 PM
آخر رد: MOHAMMED ALZWI
  [VB.NET] احتاج الى حل في عرض الملفات على داتا جرد فيو raedre22 4 595 11-07-24, 06:32 PM
آخر رد: raedre22
  حذف الصورة من المجلد محمد خيري 17 1,184 07-04-24, 03:50 PM
آخر رد: محمد خيري
  تعديل طول حقل معين في جميع جداول القاعدة atefkhalf2004 1 424 09-03-24, 03:17 AM
آخر رد: atefkhalf2004
  تحميل جميع الماسحات الضوئية المتصلة بالجهاز في كومبوبوكس جيولوجي مبتدئ 2 594 22-02-24, 07:10 PM
آخر رد: جيولوجي مبتدئ

التنقل السريع :


يقوم بقرائة الموضوع: