[ابو روضة]

PHP كود :

Dim x As String = "CrazyTalk Animator Preview"
Dim d As DirectoryInfo = New DirectoryInfo("C:\DirectoryToAccess")
Dim infos As FileInfo() = d.GetFiles(x & "*.*")
For Each f As FileInfo In infos
    Dim fn As String = f.FullName
    fn = fn.Replace(x, "")
    My.Computer.FileSystem.RenameFile(f.FullName, Path.GetFileName(fn))
Next 


جزاك الله كل خير اخى الكريم بس انا اريده يحذف كذا كلمة احددها انا 

يعنى لو ملفات بها كلمات كثيرة فاريد حذف مثلا اول كلمة والكلمة اللى فى الوسط والكلمة اللى قبل الأخيرة

يعنى تحديد كذا كلمة ليس كلمة واحدة....... الله يكرمك