一定期間利用されていないファイルを移動するツール

//--------------------------------------------------------------------
// 一定期間更新していないファイルをフォルダに移動するツール
//--------------------------------------------------------------------
// 初期化
var fso = WScript.CreateObject("Scripting.FileSystemObject");
// このプログラムの起動パス
var curPath = fso.GetFile(WScript.ScriptFullName).ParentFolder.Path;
// 古いファイルの移動先フォルダのパス(フォルダに今月の日付を入れる)
var now = new Date();
var oldPath = curPath + "¥¥未使用" + 
      now.getFullYear() + "-" + (now.getMonth()+1);
// 未使用を許容する日付(ここでは、90日を指定)
var expires = 90;
// 処理を実行する
moveOldFile(curPath, oldPath, expires);
//--------------------------------------------------------------------
function moveOldFile(curPath, oldPath, expires) {
  // 指定パスのファイル一覧を得る
  var files = fso.GetFolder(curPath).Files;
  var moveCount = 0;
  // ファイルを一つずつ処理する
  var e = new Enumerator(files);
  for ( ; !e.atEnd(); e.moveNext()) {
    var file = e.item();
    var dla = new Date(file.DateLastModified);
    var diff = (now.getTime() - dla.getTime()) / (1000 * 60 * 60 * 24);
    if (diff > expires) { // 移動が必要か？
      if (!fso.FolderExists(oldPath)) fso.CreateFolder(oldPath);
      file.Move(oldPath+"¥¥");
      moveCount++;
    }
  }
  WScript.Echo("ファイルを "+moveCount+" 個移動しました!");
}
//--------------------------------------------------------------------