Total Commander

[LocKtaR-o-DarK]

Tol!k
1. проверь название vbs-файла
оно не должно совпадать с названиями команд
так, возможна ошибка при работе кода если файл будет называться ren или rename или еще как-то
для сценариев и скриптов необходимо задавать уникальные имена, не совпадающие с командами


скрипт
Код:
' В качестве команды указываем путь к скрипту
' допускаетcя использование %commander_path%
' Параметры кнопки: %L
' Автор: LocKtaR-o-DarK™
If WScript.Arguments.Count=0 Then
MsgBox "Не заданы параметры!",,"Переименование файлов по маске из буфера"
WScript.Quit
End If
CreateObject("WScript.Shell").Run "c:\renbm.cmd "&WScript.Arguments(0)&" """&CreateObject("htmlfile").ParentWindow.ClipboardData.GetData("text")&"" ,0

c:\renbm.cmd замени на свой путь, допускается использование %commander_path%

сценарий
Код:
@echo off
chcp 1251>nul
for /f "delims=" %%a in (%1) do ren "%%a" """"%2_%%~nxa""""

еще один момент, путь запуска у кнопки должен быть пустым
_________________