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

مثلا اسم الفولدرث xls \vb2010

اغير الحروف كابيتل لكل الفولدرات او استبدل vb لكل الفولدرات ب mazen
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

فالنفرض لدينا في الـ C مجلد باسم Mazen يحتوي علي عدة مجلدات .

لتغيير أسماء المجلدات لتكون كلها بالحروف الكبيرة :
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            Dim dir As IO.DirectoryInfo = New IO.DirectoryInfo("C:\Mazen")
            For Each d As IO.DirectoryInfo In dir.GetDirectories
                Rename(d.FullName, d.FullName.ToUpper)
            Next
        Catch ex As Exception
            MsgBox(ex.Message, 48, "Error")
        End Try
    End Sub

لاستبدال جزء من اسم المجلد :
كود :
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Try
            Dim dir As IO.DirectoryInfo = New IO.DirectoryInfo("C:\Mazen")
            For Each d As IO.DirectoryInfo In dir.GetDirectories
                Dim newName As String = d.FullName.Replace(("vb").ToLower, "Mazen")
                Rename(d.FullName, newName)
            Next
        Catch ex As Exception
            MsgBox(ex.Message, 48, "Error")
        End Try
    End Sub


****
***
**
*
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}}
تم الشكر بواسطة:
#3
قمة في الروعة اخي kslawy 100/100
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] الحصول على اسماء المستخدمين Mohamed20 1 78 02-10-17, 02:54 PM
آخر رد: سعود
  [سؤال] جلب اسماء الملفات دون اسم المسار ابو روضة 11 284 01-10-17, 06:23 AM
آخر رد: ابو روضة
  [سؤال] كيفية معرف اسماء كل Button الموجودة فى الفروم عن طريق كلاس alims 8 171 04-09-17, 11:27 PM
آخر رد: alims
  طريقة طباعة فاتورة و التحكم بشكلها Basil Abdallah 2 269 28-07-17, 01:19 AM
آخر رد: IBRA939
  بخصوص HtmlElement النقر على مجموعة ازرار دفعة واحدة بكود واحد Basil Abdallah 2 145 21-06-17, 09:11 PM
آخر رد: Basil Abdallah
  [سؤال] احتاج الى مساعدة في التحكم في ملف تكست خارجي malek369 1 158 20-06-17, 07:38 AM
آخر رد: سعود
  التحكم في لون checkboxخاصيته enabled=false تناسيم 1 111 14-06-17, 06:42 AM
آخر رد: silverlight
  التحكم في برامج youssef1 3 196 20-05-17, 03:05 PM
آخر رد: Amir_alzubidy
  سؤال بخصوص التحكم بالمحرك عن طريق الحاسوب Basil Abdallah 1 157 16-05-17, 12:17 AM
آخر رد: محمود بكرى
  كيفية التحكم في تنسيق عمود خلايا واحد في الداتا جريد تناسيم 3 261 30-04-17, 06:31 PM
آخر رد: alma_fandi

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


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