Цитата skuns (
)
а вот при переименовании папки почему-то удаляет все символы после последней встретившейся точки
Это делает .GetBaseName(SelFile) , который не распазнаёт папка или не папка и ему всё равно, если есть точка, значит после неё расширение
Подправил - скрипт в шапке.
P.S. - Сто лет уже не занимался скриптами vbs, большинство скриптов вошло в утилиту TCIMG, вот к примеру тоже самое в ней:
renms
Код
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\TCIMG.exe
renms=%WL||~~!!_
%COMMANDER_PATH%\Wcmicons.dll,1
Переименовать выделенные объекты, заменить пробел на подчёркивание
0
-1