تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ترتيب الملفات في المجلد حسب تاريخ التعديل مع حذف الاقدم
#1
كيف يمكن ترتيب الملفات في المجلد حسب تاريخ التعديل  او الانشاء
مع حذف الاقدم 
اي ابفي علي  احدث  10  ملفات داخل المجلد وامسح الباقي

او عرضهم في لست حسب الاقدم  او  الاخدث
الرد }}
تم الشكر بواسطة:
#2
هذا الكود يرتب الملفات حسب تاريخ الانشاء من الاحدث الى الاقدم

كود :
       Dim di As New DirectoryInfo("folder path")
       Dim fileList = di.GetFiles()
       fileList = fileList.OrderByDescending(Function(x) x.CreationTime).ToArray()
و هذا يبقى احدث 10 ملفات بالمجلد و يحذف الاقدم
كود :
       Dim di As New DirectoryInfo("myFolder")
       Dim fileList As FileInfo() = di.GetFiles()
       fileList = fileList.OrderBy(Function(x) x.CreationTime).ToArray()
       For i = 0 To fileList.Count - 9
           fileList(0).Delete()
       Next
الرد }}
تم الشكر بواسطة: sendbad100
#3
شكرا لك كثيرا

وكيف يتم عرضهم في لستة  الاول

كه صح  ولا هناك الافضل


        For i = 0 To fileList.Count - 1
            ListBox1.Items.Add(fileList(i))
        Next

وهذا الكود  للحذف
   ListBox1.DataBindings.Clear()
        ListBox1.Items.Clear()
        Dim di As New DirectoryInfo("d:\datacopy")
        Dim fileList As FileInfo() = di.GetFiles()
        fileList = fileList.OrderBy(Function(x) x.CreationTime).ToArray()
        For i = 0 To fileList.Count - 4
            'fileList(0).Delete()

هنا الخطأ
            Dim DeleteFile As String = "d:\datacopy\" & fileList(i)


برجاء التعديل

            My.Computer.FileSystem.DeleteFile(DeleteFile)
        Next
الرد }}
تم الشكر بواسطة:
#4
اذا اردت عرضهم فى الليست 

كود :
ListBox1.Items.AddRange(fileList.ToArray)
الرد }}
تم الشكر بواسطة: sendbad100


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كود اضافة اسبوع على تاريخ معين Lathe1 5 338 18-06-22, 10:59 AM
آخر رد: Lathe1
  [VB.NET] كيفية التعديل علي firebase من خلال auth ميدو الفنان 2 316 12-06-22, 01:36 AM
آخر رد: أبو خالد الشكري
  طلب مساعدة في البحث عن مواقع لتحميل الملفات الصوتية للاحرف كل حرف على جدى AHMED213 0 191 06-06-22, 03:54 PM
آخر رد: AHMED213
  ترتيب العرض الشراء الاول ثم السداد في حالة تساوي التاريخ atefkhalf2004 2 202 26-05-22, 10:07 PM
آخر رد: atefkhalf2004
  المساعدة في بناء جملة استعلام لمعرفة رصيد الموظف في تاريخ معين strongriseman 7 493 09-05-22, 02:00 AM
آخر رد: ابو انس
  [VB.NET] تعديل كود حذف الملفات ابو جمال 2 407 29-04-22, 11:38 PM
آخر رد: ابو انس
  لا استطيع التعديل على صفخة كريستور ريبورت ارجوا المساعدة rochdi191 4 816 02-04-22, 01:43 AM
آخر رد: rochdi191
  مشكله زر التعديل ضرورى افادكم الله حسين ادريس 6 610 12-03-22, 03:43 AM
آخر رد: حسين ادريس
  كيفية برمجه زر التعديل والحفظ حسين ادريس 0 474 10-03-22, 10:12 PM
آخر رد: حسين ادريس
  ترتيب صفوف datatgridveiw DOX.1 2 486 06-03-22, 03:10 AM
آخر رد: ahmedhhh2

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم