var StartFolder="c:\Обмен"; // Scanning Start Folder

var Interval=45; // Days

//folders and files in StartFolder not deleted

 

var fso, f, fc;

var deep=0;

 

if(WScript.Arguments.length==0)

 WScript.Quit();

if(WScript.Arguments(0)!="GO")

 WScript.Quit();

Interval = Interval * 1000 * 60 * 60 * 24;

fso = new ActiveXObject("Scripting.FileSystemObject");

cd = new Date().valueOf();

ScanFolder(StartFolder);

 

function ScanFolder(fldr)

{

 var fl, fc, f

 var fcd, fmd

 

 fl = fso.GetFolder(fldr); // Subfolder

 fc = new Enumerator(fl.SubFolders);

 for (;!fc.atEnd(); fc.moveNext()){

  deep++;

  ScanFolder(fc.item());

  deep--;

  }

 delete fc;

 delete f;

 var fcount=0;

 fc = new Enumerator(fl.Files); // Files

 for (;!fc.atEnd(); fc.moveNext()){

  f = fso.GetFile(fc.item());

  fcd = new Date(f.DateCreated);

  fmd = new Date(f.DateLastModified);

  if(cd - fmd.valueOf()>Interval && cd - fcd.valueOf()>Interval && deep>0){ // Last Modification

   fso.DeleteFile(fc.item(), true);

   }

  else{

   fcount++;

   }

  }

 delete fc;

 delete f;

 if(fcount==0 && deep>1) // Delete Empty Folders

  fso.DeleteFolder(fldr, true);

}

#Удялем файлы дата создания и дата изменения которых меньше чем 30 дней

Get-ChildItem "E:\Обмен"|Get-ChildItem -Recurse -force|? { $_.LastWriteTime -lt (Get-Date).AddDays(-30) -and $_.CreationTime -lt (Get-Date).AddDays(-30) } | Where-Object {$_.mode -notmatch "d"}|Remove-Item -Force

#

#

#Удаляем пустые папки в которых нет дочерних файлов и папок

Get-ChildItem "E:\Обмен"|Get-ChildItem -Recurse -force|Where-Object {$_.mode -match "d"} | Where-Object {$_.GetFiles().Count -eq 0 -and $_.GetDirectories().Count -eq 0}| Remove-Item -Force

powershell -Command Set-ExecutionPolicy RemoteSigned

powershell -File MyScript.ps1

powershell -command start-sleep -milliseconds 100

D:\Swap>help Start-Sleep

Данная команда не поддерживается. Воспользуйтесь параметром "Start-Sleep /?".

 

D:\Swap>Start-Sleep /?

"Start-Sleep" не является внутренней или внешней

командой, исполняемой программой или пакетным файлом.

PS C:\Users\administrator> help Start-Sleep

 

ИМЯ

    Start-Sleep

 

ОПИСАНИЕ

    Приостанавливает выполнение скрипта или сеанса на указанный период времени.

 

 

СИНТАКСИС

    Start-Sleep -Milliseconds <int> [<CommonParameters>]

 

    Start-Sleep [-Seconds] <int> [<CommonParameters>]

 

 

ОПИСАНИЕ

    Командлет Start-Sleep приостанавливает выполнение скрипта или сеанса на указанный период времени. Его можно использ

    овать для решения различных задач, например чтобы дождаться завершения операции или приостановить работу перед повт

    ором операции.

 

 

ССЫЛКИ ПО ТЕМЕ

    Online version: http://go.microsoft.com/fwlink/?LinkID=113407

 

ЗАМЕЧАНИЯ

    Для просмотра примеров введите: "get-help Start-Sleep -examples".

    Для получения дополнительных сведений введите: "get-help Start-Sleep -detailed".

    Для получения технических сведений введите: "get-help Start-Sleep -full".