[Abou Eman]

السلام عليكم

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

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 و بامكانك التعيل عليه