@echo off
setlocal enableextensions enabledelayedexpansion
LoopArgs:
if [%1]==[] endlocal & exit /b
pushd %1
for %%I in (*.*) do (
  set Name=%%I
  set Name=!Name:%%28=(!
  set Name=!Name:%%29=)!
  if not %%I==!Name! rename %%I !Name!
)
popd
shift
goto LoopArgs

var FSO = new ActiveXObject("Scripting.FileSystemObject");
var Args = WScript.Arguments;
for (var i = 0; i < Args.length; i++) {
  var FilesEnum;
  try {
    var DirPath = Args.item(i);
    FilesEnum = new Enumerator(FSO.GetFolder(DirPath).Files);
  } catch (Err) {
    WScript.Echo(
      "Каталог: " + DirPath + "\n" +
      Err.name + " " + Err.number + ": " + Err.message
    );
    FilesEnum = new Enumerator();
  }
  for (; !FilesEnum.atEnd(); FilesEnum.moveNext()) {
    var File = FilesEnum.item();
    var Name = File.Name, NewName = unescape(Name);
    try {
      if (NewName != Name) File.Name = NewName;
    } catch (Err) {
      WScript.Echo(
       "Каталог: " + DirPath + "\n" +
       "Переименование: " + Name + "->" + NewName +"\n" +
        Err.name + " " + Err.number + ": " + Err.message
      );
    }    
  }
}