Вариант 1
Переименование файлов и папок.
RENAME [диск:][путь][папка1 | имя_файла1] [папка2 | имя_файла2]
REN [диск:][путь][папка1 | имя_файла1] [папка2 | имя_файла2]
Вариант 2
Скачать с
http://www.microsoft.com/ и установить последнюю версию Windows Script Host.
Здесь scriptfile- это полный путь и название файл-скрипта,который содержит следующее:
Set FSO = CreateObject("Scripting.FileSystemObject")
sEXT = "oldext"
sNEW = "newext"
sDIR = "directory"
Set objDIR = GetFolder(sDIR)
GoSubFolders objDIR
Sub MainSub (objDIR)
For Each efile in objDIR.Files
fEXT = FSO.GetExtensionName(efile.Path)
If LCase(fEXT) = LCase(sEXT) Then
fNAME=Left(efile.name,(Len(efile.Name)-Len(fEXT)))+sNEW
efile.name = fNAME
End If
Next
End Sub
Здесь oldext -название расширения , которое нужно найти, newext- название расширения для замены, а directory - название папки, с которой начинать поиск