[princelovelorn]

(07-05-25, 01:13 PM)1albasha كتب :

PHP كود :

D:\all\الطيبة مرقم\1 


كنت ارغب كما فعلنا في فتح ملف اذا لم يجده في قرص يبحث عنه في الاقراص الاخرى
وهنا هذا المسار للمجلد اذا لم يجده في D يبحث عنه في E ثم G تماما كما فعلن في فتح ملف اي يبحث عن المجلد في كل الاقراص

أستخدم الأكواد التالية

كود :

   ' أكتب هنا المسارات كاملة اللى ممكن تستخدمها
   Private Shared ReadOnly Folder_Path As String() = {
       "C:\ALL\1\الطيبة مرقم\",
       "D:\ALL\1\الطيبة مرقم\",
       "E:\ALL\1\الطيبة مرقم\",
       "F:\ALL\1\الطيبة مرقم\",
       "G:\ALL\1\الطيبة مرقم\"
   }

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       OpenFolderPath()
   End Sub

   Public Shared Function OpenFolderPath() As Boolean
       For Each search_f_Path As String In Folder_Path
           Dim fullPath As String = search_f_Path
           If Directory.Exists(fullPath) Then
               Process.Start(fullPath)
               Return True ' تم العثور على المجلد وفتحه
           End If
       Next
       Return False ' لم يتم العثور على المجلد في أي من المسارات
   End Function