12/12/07 06:59:22.72 8Onssb2b0
・選択項目が10以上もしくは選択項目にフォルダがあった場合は FastCopy で削除、そうでない場合はバックグラウンドで削除(基本オプション→その他→削除)
Script:JScript
fs = new ActiveXObject("Scripting.FileSystemObject");
cSel = WScript.Col(WScript.Env('Selected'));
bFC = false;
if (cSel.Count >= 10) {
bFC = true;
}
else {
for (i = 0; i < cSel.Count; i++) {
if (fs.FolderExists(cSel.Item(i))) {
bFC = true;
break;
}
}
}
if (bFC) {
WScript.Exec('4:%X-Finder%..\\fastcopy\\fastcopy.exe /cmd=delete /auto_close');
}
else {
WScript.Exec('Delete: %Selected% /b /a');
}
ヘルプにあるじゃん