تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
احتاج كود التحقق من مجلد ان كان فارغ
#1
السلام عليكم ورحمة الله تعالى وبركاته
اتمنى ان يكون الجميع بالف خير وعافية

ابحث على كود يتحقق من المجلد ان كان فارغ ام لا
وشكرا Big Grin Big Grin
[صورة مرفقة: 000.gif]
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

تفضل الكود
كود :
Dim path As String = "C:\folder"

If IO.Directory.Exists(path) Then

   Dim b As Boolean = IO.Directory.EnumerateFileSystemEntries(path).Any

   If b Then
       MsgBox("المجلد ليس فارغ")
   Else
       MsgBox("المجلد فارغ")
   End If

Else
   MsgBox("لم أجد المجلد")
End If
الرد }}}}
#3
(28-03-17, 06:10 PM)مساعدة كتب : السلام عليكم

تفضل الكود
كود :
Dim path As String = "C:\folder"

If IO.Directory.Exists(path) Then

   Dim b As Boolean = IO.Directory.EnumerateFileSystemEntries(path).Any

   If b Then
       MsgBox("المجلد ليس فارغ")
   Else
       MsgBox("المجلد فارغ")
   End If

Else
   MsgBox("لم أجد المجلد")
End If
الله يحفظك اخي
دائما متألق
جزاك الله خيرا
[صورة مرفقة: 000.gif]
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  أريد كود إذا كان أول سطر فارغ في الـ RichTextBox1 يكتب في أول سطر ؟ DanyGhost2010 2 53 02-01-18, 05:02 PM
آخر رد: DanyGhost2010
  هل يمكن قفل مجلد اثناء تشغيل البرنامج bidaya 0 34 02-01-18, 01:45 AM
آخر رد: bidaya
  جلب اسم مجلد في مسار ثابت bidaya 2 54 02-01-18, 01:35 AM
آخر رد: bidaya
  [VB.NET] احتاج تعديل الكود "تأكد من الصلاحية" hglogtd 3 109 02-01-18, 01:02 AM
آخر رد: طالب برمجة
  [VB.NET] اريد كود تحميل ملف من مجلد مشاركة في جهاز آخر بنفس الشبكة abomo3ath 3 67 31-12-17, 11:17 PM
آخر رد: abomo3ath
  اعتماد الخطوط من مجلد المشروع العيدروس 1 87 01-12-17, 05:56 AM
آخر رد: عبد العزيز البسكري
  كيف اجعل الكمبوبوكس فارغ عند التحميل الج نرال 2 82 08-11-17, 05:01 PM
آخر رد: الج نرال
  [VB.NET] احتاج كود وضع علامة خلف النص The Light Fire 2 151 27-10-17, 01:52 PM
آخر رد: The Light Fire
  احتاج كود لطباعة الصور المخزنة في الداتا بيز Access sajakh 0 79 14-10-17, 10:33 PM
آخر رد: sajakh
  [سؤال] احتاج مساعده في البحث gnoonplas 9 286 14-10-17, 04:03 PM
آخر رد: Amir_alzubidy

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


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