タブファイラー・X-Finder [ x ] Part38

[23 名無しさん＠お腹いっぱい。 2024/02/04(日) 15:03:41.42 ID:choI/Qhn0]

>>22
エラーが起きるのは変更がないにもかかわらずリネームしようとしてるから
>>19を添削するならこんな感じ

Script:JScript
var fs = new ActiveXObject('Scripting.FileSystemObject');
var cSel = WScript.Col(WScript.Env('CurrentSelected'));
var path, base, ext, file;
for (var i = 0; i < cSel.Count(); i++) {
path = cSel.Item(i);
if (fs.FileExists(path)) {
base = fs.GetBaseName(path);
ext = fs.GetExtensionName(path);
file = fs.GetFile(path);
newbase = base.replace(/\./g, '');
if (newbase != base) {file.Name = newbase + '.' + ext;}
}
}