Любой язык - Скрипт удаления файлов в папке старше N дней

[dobermann]

Подскажите, как создать исполняемый \ пакетный файл в среде Windows ХР чтобы он удалял все файлы старше N кол-ва дней от текущей даты в конкретной папке?

[dobermann]

Если без рекурсии, то примерно так:

Код: Выделить всё

0</* :
@cscript /nologo /e:jscript "%~f0"&exit /b */0;
(function(directory, daysleft) {
  var fso = new ActiveXObject('Scripting.FileSystemObject');
  String.prototype.getExistance = function() {
    return Math.floor((
      new Date - new Date(fso.GetFile(this).DateCreated)
    ) * (1 / 86400000));
  }
  with (fso.GetFolder(directory)) {
    for (var e = new Enumerator(Files); !e.atEnd(); e.moveNext()) {
      var file = e.item();
      if (file.Path.getExistance() > daysleft) {
        WScript.echo(file.Path);
        file.Attributes = 0;
        file.Delete();
      }
    }
  }
}('X:\\myfolder', 14));