30-06-13, 12:50 AM
sooriaty03 كتب :السلام عليكم ورحمة الله وبركاته
بحسب ما فهمت من سؤالك أنك تريد فتح مجلد بواسطة برنامجك
وبعد ذلك يقوم برنامجك بتفحص الملفات الموجودة داخل هذا المجلد فإن وجد ملف صورة ذات امتداد jpg أو png قام بإضافتها إلى ListBox1
في هذه الحالة يجب أن تتأكد أن المستخدم سيقوم بفتح مجلد وليس ملف وإلا سيظهر خطأ في البرنامج
تابع معي الكود التالي
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
For Each Path As String In My.Application.CommandLineArgs
[color=#008000] 'قمنا بعمل شرط للتحقق من أن المتغير عبارة عن مجلد[/color]
If IO.Directory.Exists(Path) Then
[COLOR=#008000] 'المتغير عبارة عن مجلد
'نقوم باستيراد ملفات الصور ذات الامتداد المطلوب[/COLOR]
ListBox1.Items.AddRange(Directory.GetFiles(Path, "*.jpg"))
Else
[COLOR=#008000] 'المتغير عبارة عن ملف
'سنقوم بفحصه لنرى هل هو صورة[/COLOR]
If IO.Path.GetExtension(Path) = ".jpg" Then
[color=#008000] 'الملف صورة وبالتالي نقوم بإضافته إلى القائمة[/color]
ListBox1.Items.Add(Path)
End If
End If
Next
End Sub
بالتوفيق
جزاك الله خير اخى
