منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

السلام عليكم

عندة مجلد فيه ملفات اسمائها كالتالى

01.1-1
02.1-2
03.1-3

عاوز اقص 01. & 02. & 03. من كل الملفات داخل المجلد

بحيث يبقى كده

1-1
1-2
1-3

كود :

  For Each x As String In My.Computer.FileSystem.GetFiles(Application.StartupPath & "\F\")

            My.Computer.FileSystem.RenameFile(x, IO.Path.GetFileName(x).Split(".")(1) & IO.Path.GetExtension(x))

        Next

هذا مجلد داخل ملف البرنامد بأسم F و بامكانك التعيل عليه

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

Abou Eman

سامي محمد