タブファイラー・X-Finder [ x ] Part36©2ch.net

[0359 名無しさん＠お腹いっぱい。 2018/05/27(日) 01:11:54.86 ID:bHpvpwXC0]

選択したフォルダの中身をカレントに引き上げたのち、そのフォルダを削除
Script:JScript
fs = WScript.CreateObject("Scripting.FileSystemObject");
cSel = WScript.Col(WScript.Env('CurrentSelected'));
if (cSel.Count > 0 && fs.FolderExists(cSel.Item(0))) {
for ( i in cSel) {
if (fs.FolderExists(cSel.Item(i))) {
WScript.Exec('move: "' + cSel.Item(i) + '\\*" /t "%Current%" /r /u');
WScript.Exec('Delete: "' + cSel.Item(i) + '" /b /a');
}
}
}