+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=29246)
[تم الحل]معرفة وجود الملف ضمن مجلد ? - معاذ_ابراهيم - 04-04-19
السلام عليكم
لنفترض لدي مائه مجلد عشرون منها تحتوي على ملفات من نوع txt والباقي لا يوجد فيها ملفات من هذا النوع.
كيف اقون بجلب المجلدات التي تحتوي على ملفات txt من هذه المجلدات المئه
ارجو من الله ثم منكم العون
RE: معرفة وجود الملف ضمن مجلد ? - بدري - 04-04-19
هذا الكود بعد ان تحدد مكان المائه مجلد في المتغير pth سيجمع اسماء المجلدات التي تحتوي ملفات txt فقط في اداه ListBox
ويمكن تغيير ListBox باي كود اخر بحيث يقرا المتغير d والذي فيه اسم المجلد
Dim pth = "..............."
Dim drs = Directory.GetDirectories(pth, "*.*", SearchOption.AllDirectories)
For Each d As String In drs
If Directory.GetFiles(d, "*.txt").Count > 0 Then
ListBox1.Items.Add(d)
End If
Next
RE: معرفة وجود الملف ضمن مجلد ? - معاذ_ابراهيم - 04-04-19
الحمد لله
اشكرك اخي على المساعده القيمه
RE: معرفة وجود الملف ضمن مجلد ? - DK-x - 04-04-19
(04-04-19, 04:01 PM)بدري كتب : هذا الكود بعد ان تحدد مكان المائه مجلد في المتغير pth سيجمع اسماء المجلدات التي تحتوي ملفات txt فقط في اداه ListBox
ويمكن تغيير...
عمل ممتاز لكن اذا اردت ان يجلب فقط الملفات من نوع txt (المسارات الخاصة بها) ويضعها في ListBox كيف يكون الكود
وجزاك الله خير 
RE: [تم الحل]معرفة وجود الملف ضمن مجلد ? - بدري - 04-04-19
هذا الكود يجلب مسارات الملفات من نوع txt
Dim pth = "..............."
Dim fs = Directory.GetFiles(pth, "*.txt", SearchOption.AllDirectories)
For Each t As String In fs
ListBox1.Items.Add(t)
Next
RE: [تم الحل]معرفة وجود الملف ضمن مجلد ? - elgokr - 04-04-19
(04-04-19, 10:19 PM)DK-x كتب :(04-04-19, 04:01 PM)بدري كتب : هذا الكود بعد ان تحدد مكان المائه مجلد في المتغير pth سيجمع اسماء المجلدات التي تحتوي ملفات txt فقط في اداه ListBox
ويمكن تغيير...
عمل ممتاز لكن اذا اردت ان يجلب فقط الملفات من نوع txt (المسارات الخاصة بها) ويضعها في ListBox كيف يكون الكودوجزاك الله خير
للاضافة عن ما يقوم به اخى الكريم بدري
يمكنك ايضاً الاطلاع على الرابط التالى
تحياتى لك
وتمنياتى لك التوفيق