Windows Script Host для Windows 2000/XP

  File.Delete();
  //Увеличиваем счетчик количества перемещенных файлов
  Col++;
 }
 //Переходим к следующему файлу в коллекции
 Files.moveNext();
}

После перемещения всех файлов на экран выводится информация об их количестве:

WScript.Echo('Перемещено файлов:', Col);
WScript.Echo('Нажмите Enter...');
WScript.StdIn.ReadLine();

Полный текст сценария MoveLog.js приведен в листинге 5.19.

Листинг 5.19. Поиск файлов с ведением log-файла

/*******************************************************************/
/* Имя: MoveLog.js                                                 */
/* Язык: JScript                                                   */
/* Описание: Перемещение файлов из каталога-источника в            */
/*           целевой каталог с ведением log-файла                  */
/*******************************************************************/
//Объявляем переменные
var
 Source='C:\In\', //Путь к каталогу-источнику файлов для перемещения
 Dest='C:\Out\',  //Путь к целевому каталогу
 Mask='003',        //Расширение файлов для перемещения
 PathLog='C:\In\log.txt',   //Путь к log-файлу
 ForAppending=8;    //Константа для работы с файлами
//Объявляем переменные
var FSO,Fold,Files;
//Функция для записи информации в log-файл
function WriteLog() {
//Объявляем переменные
var s,ss,s1,d,File,FLog;
 WScript.Echo('');
 WScript.Echo('Записываем информацию в log-файл...');
 //Открываем log-файл для добавления
 FLog=FSO.OpenTextFile(PathLog,ForAppending,true);
 //Переходим к первому элементу коллекции файлов
 Files.moveFirst();
 //Цикл по всем файлам в коллекции
 while (!Files.atEnd()) {
  //Извлекаем текущий файл из коллекции
  File=Files.item();
  //Выделяем расширение файла
  s=FSO.GetExtensionName(File.Name);
  //Проверяем, совпадает ли расширение текущего файла
  //с расширением файлов для перемещения
  if (s==Mask) {
   //Выводим имя файла на экран
   WScript.Echo('  '+File.Name);
   //Определяем дату создания файла
   d=new Date(File.DateCreated);
   //Формируем строку ss для записи в log-файл
   ss=LFillStr(13,File.Name)
   s1='('+DateToStr(d)+' ';
   s1+=TimeToStr(d)+')';
   ss+=LFillStr(20,s1);
   //Определяем текущую дату
   d=new Date();
   ss+=DateToStr(d);
   ss+=' '+TimeToStr(d);
   //Записываем сформированную строку в log-файл
   FLog.WriteLine(ss);
  }
  //Переходим к следующему файлу в коллекции
  Files.moveNext();
 }
}
//Функция для перемещения файлов
function MoveFiles() {
 //Объявляем переменные
 var s,ss,Col,File;
 Col=0; //Счетчик количества перемещенных файлов
 WScript.Echo('');
 WScript.Echo('Перемещаем файлы ...');
 //Переходим к первому элементу коллекции файлов
 Files.moveFirst();
 //Цикл по всем файлам в коллекции
 while (!Files.atEnd()) {
  //Извлекаем текущий файл из коллекции
  File=Files.item();
  //Выделяем расширение файла
  s=FSO.GetExtensionName(File.Name);
  //Проверяем, совпадает ли расширение текущего файла
  //с расширением файлов для перемещения
  if (s==Mask) {
   //Выводим имя файла на экран
   WScript.Echo('  '+File.name);
   //Копируем файл в целевой каталог
   File.Copy(Dest);
   //Удаляем файл
   File.Delete();
   //Увеличиваем счетчик количества перемещенных файлов
   Col++;
  }
  //Переходим к следующему файлу в коллекции
  Files.moveNext();
 }
 //Выводим информацию о количестве перемещенных файлов