Recent cleaner

「最近使ったファイルの一覧」を削除します。
デスクトップ上に置いておくと便利かもしれません。
＊recentフォルダの中身を空っぽにするプログラムですので、 recentフォルダに大事なファイルを保存されている方(^^;は、ファイルを別フォルダなどに退避しておいて下さい。

[ Download: Recent Cleaner ]

<< recent11.js >>

/* Recent Cleaner ver1.1 */

var ConfirmFlag = true;  //確認ボックスを開くかどうか(true/false)
                         //falseにすると確認ボックスを出しません。

var WshShell = WScript.CreateObject("WScript.Shell");
var fs       = WScript.CreateObject("Scripting.FileSystemObject");
var RecentDir= WshShell.SpecialFolders("Recent")


if(!(fs.FolderExists(RecentDir))) {
   WScript.Echo(RecentDir+"が見つかりません。");
   WScript.Quit();
 } 

//削除の確認
if(ConfirmFlag) {
   if(WshShell.Popup("最近使ったﾌｧｲﾙの一覧を削除します。\nよろしいですか？",0,"確認",65) == 2) {
     WScript.Quit();
    }
 }


var g_fld    = fs.GetFolder(RecentDir);
var fle      = new Enumerator(g_fld.Files);

//ディレクトリ内のファイルを削除する
 for(; !fle.atEnd(); fle.moveNext()) {
    gf = fs.GetFile(fle.item().Path);
    gf.Delete(true);
  }

[ Back ]