Windows Script Host для Windows 2000/XP

Для работы с файловой системой из сценариев WSH предназначены восемь объектов, главным из которых является

FileSystemObject

FileSystemObject

□ копировать или перемещать файлы и каталоги;

□ удалять файлы и каталоги;

□ создавать каталоги;

□ создавать или открывать текстовые файлы;

□ создавать объекты

Drive

Folder

File

С помощью свойств объектов

Drive

Folder

File

Folder

File

FileSystemObject

Кроме этого, имеются три объекта-коллекции:

Drives

Folders

Files

Drives

Drive

Folders

Folder

Files

File

Наконец, из сценария можно читать информацию из текстовых файлов и записывать в них данные. Методы для этого предоставляет объект

TextStream

В табл. 5.1 кратко описано, какие именно объекты, свойства и методы могут понадобиться для выполнения наиболее часто используемых файловых операций.

Таблица 5.1. Выполнение основных файловых операций

Drive

Drive

GetDrive

FileSystemObject

Folder

File

GetFolder

GetFile

FileSystemObject

DriveExists

FolderExists

FileExists

FileSystemObject

CopyFile

CopyFolder

FileSystemObject

File.Сору

Folder.Сору

MoveFile

MoveFolder

FileSystemObject

File.Move

Folder.Move

DeleteFile

DeleteFolder

FileSystemObject

File.Delete

Folder.Delete

FileSystemObject.CreateFolder

Folders.Add

FileSystemObject.CreateTextFile

Folder.CreateTextFile

Drives

FileSystemObject.Drives

Folders

Folder.SubFolders

Files

Folder.Files

FileSystemObject.CreateTextFile

File.OpenAsTextStream

TextStream

Перейдем теперь к подробному рассмотрению объектов, используемых при работе с файловой системой.

Объект FileSystemObject

FileSystemObject

Drives

Drive

Folders

Folder

Files

File

TextStream

FileSystemObject

CreateObject

WScript

var FSO = WScript.CreateObject("Scripting.FileSystemObject");

ActiveXObject

var FSO = new ActiveXObject("Scripting.FileSystemObject");

FileSystemObject

Drives

Drive

Drives 

FileSystemObject

BuildPath(path, name)

path

name

CopyFile(source, destination [, overwrite])

source

destination

CopyFolder(source, destination [, overwrite])

source

destination

CreateFolder(foldername)

foldername

foldername

CreateTextFile(filename [/overwrite[, unicode]])

filename

TextStream

DeleteFile(filespec [, force])

filespec

DeleteFolder(folderspec [, force])

folderspec

DriveExists(drivespec)

True

drivespec

False

FileExists(filespec)

True

filespec

False

FolderExists(folderspec)

True

folderspec

False

GetAbsolutePathName(pathspec)

pathspec

GetBaseName(path)

path

GetDrive(drivespec)

Drive

drivespec

GetDriveName(path)

path

GetExtensionName(path)

path

path

GetExtensionName

GetFile(filespec)

File

filespec

filespec

GetFile

GetFileName(pathspec)

pathspec

GetFileName

GetFolder(folderpec)

Folder

folderspec

folderspec

GetFolder

GetParentFolderName(path)

path

GetSpecialFolder(folderpec)

Folder

folderspec

GetTempName()

MoveFile(source, destination)

source

destination

MoveFolder(source, destination)

source

destination

OpenTextFile(filename[, iomode[, create[, format]]])

TextStream

FileSystemObject

source

destination

FSO = WScript.CreateObject("Scripting.FileSystemObject");

FSO.CopyFile("с:\\mydocuments\\letters\\*.doc", "с:\\tempfolder\\");

FSO = WScript.CreateObject("Scripting.FileSystemObject");

FSO.CopyFile("с:\\mydocuments\\*\\R1???97.xls", "с:\\tempfolder");

overwrite

destination 

overwrite=true

overwrite=false

CopyFile

CopyFolder

COPY

overwrite

overwrite

true

overwrite

false

unicode

unicode

true

unicode

false

TextStream

/*******************************************************************/

/* Имя: CreateFile.js                        */

/* Язык: JScript                          */

/* Описание: Создание текстового файла и запись в него строки    */

/*******************************************************************/

var FSO,f; //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject"); 

//Создаем на диске C: текстовый файл TestFile.txt

f = FSO.CreateTextFile("C:\\TestFile.txt", true); 

//Записываем строку в файл

f.WriteLine("Привет!"); 

//Закрываем файл

f.Close();

/*************  Конец *********************************************/

filespec

folderspec

force

false

DeleteFile

DeleteFolder

force

true 

DeleteFolder

DriveExists

true 

IsReady 

Drive

DriveExists

ReportDriveStatus

ReportDriveStatus

function ReportDriveStatus(drv) {

 var FSO, s ="" //Объявляем переменные

 //Создаем объект FileSystemObject

 FSO = WScript.CreateObject("Scripting.FileSystemObject");

 //Проверяем наличие диска drv

 if (FSO.DriveExists(drv)) s += "Диск " + drv + " существует.";

 else s += "Диск " + drv + " не существует.";

 return(s);

}

ReportDriveStatus

GetAbsolutePathName

pathspec

GetAbsolutePathName

pathspec

"С:"

"С:\MyDocuments\Reports"

"С:.."

"С:\MyDocuments"

"С:\\"

"С:\"

"Region1"

"С:\MyDocuments\Reports\Region1"

"С:\\..\\..\\MyDocuments"

"С:\МуDocuments"

Метод GetBaseName

Работу этого метода иллюстрирует сценарий BaseName.js, приведенный в листинге 5.3. В результате выполнения этого сценария на экран выводится диалоговое окно, в котором отражены полный путь к файлу и базовое имя, выделенное из этого пути (рис. 5.1).

Рис. 5.1. Полный путь к файлу и базовое имя для этого пути

Листинг 5.3. Выделение базового имени файла

/*******************************************************************/

/* Имя: BaseName.js                         */

/* Язык: JScript                          */

/* Описание: Создание текстового файла и запись в него строки    */

/*******************************************************************/

var FSO, BaseName, SPath,s;  //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Задаем путь к файлу

SPath="C:\\Мои документы\\letter.txt";

//Выделяем базовое имя файла (без расширения)

BaseName = FSO.GetBaseName(SPath);

//Выводим на экран путь и базовое имя

s="Путь: "+SPath+"\n";

s+="Базовое имя: "+BaseName;

WScript.Echo(s);

/*************  Конец *********************************************/

drivespec

С

С:

С:\\

Server1\\Programs

drivespec

GetDrive

GetDrive

GetAbsolutePathName

GetDriveName

DriveSpec = GetDriveName(GetAbsolutePathName(Path))

Метод GetParentFolderName

Для иллюстрации работы этого метода запустим сценарий ParentFolder.js (листинг 5.4). В результате будет выведено диалоговое окно с полным путем к файлу и путь к родительскому каталогу этого файла (рис. 5.2).

Рис. 5.2. Полный путь к файлу и родительский каталог этого файла

Листинг 5.4. Определение родительского каталога для файла

/*******************************************************************/

/* Имя: ParentFolder.js                       */

/* Язык: JScript                          */

/* Описание: Определение родительского каталога для файла      */

/*******************************************************************/

var FSO,ParentFolder,Spath,s;  //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Задаем путь к файлу

SPath="C:\\Programs\\letter.txt";

//Определяем родительский каталог для файла letter.txt

ParentFolder = FSO.GetParentFolderName(SPath);

s="Путь: "+SPath+"\n";

s+="Родительский каталог: "+ParentFolder;

//Выводим на экран полный путь к файлу letter.txt

//и родительский каталог для этого файла

WScript.Echo(s);

/*************  Конец *********************************************/

folderspec

WindowsFolder

С:\Windows

SystemFolder

TemporaryFolder

TMP

GetTempName

CreateTextFile

/*******************************************************************/

/* Имя: TempFile.js                         */

/* Язык: JScript                          */

/* Описание: Создание временного файла со случайным именем     */

/*******************************************************************/

var FSO,FileName,f,s;  //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Генерируем случайное имя файла

FileName=FSO.GetTempName();

//Создаем файл и именем FileName

f = FSO.CreateTextFile(FileName, true); 

//Закрываем файл

f.Close();

//Сообщаем о создании файла

WScript.Echo("Был создан файл",FileName);

/*************  Конец *********************************************/

CopyFile

CopyFolder

source

destination 

MoveFile

MoveFolder

iomode

iomode

ForReading

ForWriting

ForAppending

create

create

true

false

create

format

format

TristateUseDefault

TristateTrue

TristateFalse

TextStream

OpenTextFile

/*******************************************************************/

/* Имя: AppendFile.js                        */

/* Язык: JScript                          */

/* Описание: Добавление строки в текстовый файл           */

/*******************************************************************/

//Объявляем переменные и инициализируем константы

var FSO,f,ForAppending = 8;

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Открываем файл

f = FSO.OpenTextFile("C:\\TestFile.txt", ForAppending, true);

//Добавление в файл строку

f.WriteLine("Привет!");

//Закрываем файл

f.Close();

/*************  Конец *********************************************/

iomode

create

FileSystemObject

Объект Drive

С помощью объекта

Drive

Drive

GetDrive

FileSystemObject

var FSO, D;

FSO = WScript.CreateObject("Scripting.FileSystemObject");

D = FSO.GetDrive("C:");

Также объекты

Drive

Drives

Свойства объекта

Drive

Таблица 5.7. Свойства объекта

Drive 

AvailableSpace

DriveLetter

DriveType

FileSystem

FreeSpace

IsReady

true

false

IsReady

true

Path

С:

С:\

RootFolder

Folder

SerialNumber

ShareName

ShareName

TotalSize

VolumeName

В листинге 5.7 приведен сценарий DriveInfo.js, в котором объект

Drive

Рис. 5.3. Свойства диска С:

/*******************************************************************/

/* Имя: DriveInfo.js                        */

/* Язык: JScript                          */

/* Описание: Вывод на экран свойств диска C:            */

/*******************************************************************/

//Объявляем переменные

var FSO,D,TotalSize,FreeSpace,s;

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект Drive для диска C:

D = FSO.GetDrive("C:");

s="Информация о диске C:\n";

//Получаем серийный номер диска

s+="Серийный номер: "+D.SerialNumber+"\n";

//Получаем метку тома диска

s+="Метка тома: "+D.VolumeName+"\n";

//Вычисляем общий объем диска в килобайтах

TotalSize=D.TotalSize/1024;

s+="Объем: "+TotalSize+" Kb\n";

//Вычисляем объем свободного пространства диска в килобайтах

FreeSpace=D.FreeSpace/1024;

s+="Свободно: "+FreeSpace+" Kb\n";

//Выводим свойства диска на экран

WScript.Echo(s);

/*************  Конец *********************************************/

Коллекция Drives

Доступная только для чтения коллекция

Drives

Drive

В свойстве

Count

Drives

С помощью метода

Item(drivespec)

Drive

drivespec

var FSO, DriveCol, D; //Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Создаем коллекцию имеющихся в системе дисков

DriveCol = FSO.Drives;

// Извлечение элемента коллекции (диск С:)

D = DriveCol.Item("С:");

//Вывод на экран метки тома диска С:

WScript.Echo("Диск С: имеет метку", D.VolumeName);

Для перебора всех элементов коллекции

Drives

Enumerator

В листинге 5.8 приведен файл ListDrives.js, в котором с помощью объекта

Enumerator

Рис. 5.4. Список всех дисков, имеющихся в системе

/*******************************************************************/

/* Имя: ListDrives.js                        */

/* Язык: JScript                          */

/* Описание: Получение списка всех имеющихся дисков         */

/*******************************************************************/

//Объявляем переменные

var FSO,s,ss,Drives,D;

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Создаем коллекцию дисков, имеющихся в системе

Drives = new Enumerator(FSO.Drives);

s="";

//Цикл по всем дискам в коллекции

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

 //Извлекаем текущий элемента коллекции

 D=Drives.item();

 //Получаем букву диска

 s+=D.DriveLetter;

 s+=" - ";

 if (D.DriveType == 3) //Проверяем, не является ли диск сетевым

  //Получаем имя сетевого ресурса

  ss=D.ShareName;

 else 

  //Диск является локальным

  if (D.IsReady)  //Проверяем готовность диска

  //Если диск готов, то получаем метку тома для диска

  ss=D.VolumeName;

  else ss="Устройство не готово";

 s+=ss+"\n";

}

//Выводим полученные строки на экран

WScript.Echo(s);

/*************  Конец *********************************************/

Объект Folder

Folder

RootFolder

Drive

GetFolder

GetParentFolder

GetSpecialFolder

FileSystemObject

var FSO, Folder;

FSO = WScript.CreateObject("Scripting.FileSystemObject");

Folder = FSO.GetFolder("С:\\Мои документы");

Folder

Folders

Folder

Folder

Attributes

DateCreated

DateLastAccessed

DateLastModified

Drive

Files

Files

File

IsRootFolder

true

false 

Name

ParentFolder

Folder

Path

ShortName

ShortPath

Size

SubFolders

Folders

Type

Folder

/*******************************************************************/

/* Имя: DateFolder.js                        */

/* Язык: JScript                          */

/* Описание: Вывод на экран даты создания текущего каталога     */

/*******************************************************************/

var FSO,WshShell,s;  //Объявляем переменные

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Определяем каталог, из которого был запущен сценарий

//(текущий каталог)

Folder = FSO.GetFolder(WshShell.CurrentDirectory);

//Получаем имя текущего каталога

s="Текущий каталог: "+Folder.Name+"\n";

//Получаем дату создания текущего каталога

s+="Дата создания: "+Folder.DateCreated+"\n";

//Выводим информацию на экран

WScript.Echo(s);

/*************  Конец *********************************************/

Folder

Folder

Copy(destination [, overwrite])

CreateTextFile(filename[, overwrite [, unicode]])

filename

TextStream

CreateTextFile

FileSystemObject

Delete([force])

destination

overwrite

destination 

overwrite=true

overwrite=false

Сору

CopyFolder

FileSystemObject

force

false

Delete

Delete

Delete

DeleteFolder

FileSystemObject

destination

Move

MoveFolder

FileSystemObject

Коллекция Folders

Коллекция

Folders

Folder

SubFolders

Folder

SubFolders

Folder

var FSO, F, SubFolders;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект Folder для каталога C:\Program Files

F=FSO.GetFolder("C:\\Program Files");

//Создаем коллекцию подкаталогов каталога C:\Program Files

SubFolders=F.SubFolders;

Коллекция

Folders

Drives

Count

Item

Folders

Add(folderName)

/*******************************************************************/

/* Имя: MakeSubFold.js                       */

/* Язык: JScript                          */

/* Описание: Создание нового каталога                */

/*******************************************************************/

//Объявляем переменные

var FSO, F, SubFolders;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект Folder для каталога C:\Program Files

F=FSO.GetFolder("C:\\Program Files");

//Создаем коллекцию подкаталогов каталога C:\Program Files

SubFolders=F.SubFolders;

// Создаем каталог C:\Program Files\Новая папка

SubFolders.Add("Новая папка");

/*************  Конец *********************************************/

CreateFolder

FileSystemObject

Для доступа ко всем элементам коллекции нужно использовать, как обычно, объект

Enumerator

Рис. 5.5. Список всех подкаталогов каталога C:\Program Files

/*******************************************************************/

/* Имя: ListSubFold.js                       */

/* Язык: JScript                          */

/* Описание: Получение списка всех подкаталогов заданного каталога */

/*******************************************************************/

//Объявляем переменные

var FSO,F,SFold,SubFolders,s;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Путь к каталогу

SFold="C:\\Program Files";

s="Каталог "+SFold+"\n";

s+="Подкаталоги:\n";

//Создаем объект Folder для каталога C:\Program Files

F=FSO.GetFolder(SFold);

//Создаем коллекцию подкаталогов каталога C:\Program Files

SubFolders= new Enumerator(F.SubFolders);

//Цикл по всем подкаталогам

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

 s+=SubFolders.item()+"\n";  //Добавляем строку с именем подкаталога

}

//Выводим полученные строки на экран

WScript.Echo(s);

/*************  Конец *********************************************/

Объект File

File

GetFile

FileSystemObject

var FSO, F;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект File

F=FSO.GetFile("С:\\Мои документах\letter.txt");

File

Files

File

Attributes

DateCreated

DateLastAccessed

DateLastModified

Drive

Name

ParentFolder

Folder

Path

ShortName

ShortPath

Size

Type

Text Document

File

File

Copy(destination [, overwrite])

Delete([force])

Move(destination)

OpenAsTextStream([iomode, [format]])

TextStream

destination

overwrite

destination 

overwrite=true

overwrite=false

/*******************************************************************/

/* Имя: CopyFile.js                         */

/* Язык: JScript                          */

/* Описание: Создание и копирование файла              */

/*******************************************************************/

//Объявляем переменные

var FSO,F,WshShell,WshFldrs,PathCopy;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем файл

F=FSO.CreateTextFile("C:\\TestFile.txt", true);

//Записываем в файл строку

F.WriteLine("Тестовый файл");

//Закрываем файл

F.Close();

//Создаем объект WshShell

WshShell=WScript.CreateObject("Wscript.Shell");

//Создаем объект WshSpecialFolders

WshFldrs=WshShell.SpecialFolders;

//Определяем путь к рабочему столу

PathCopy=WshFldrs.item("Desktop")+"\\";

//Создаем объект File для файла C:\TestFile.txt

F=FSO.GetFile("C:\\TestFile.txt");

//Копируем файл на рабочий стол

F.Copy(PathCopy);

/*************  Конец *********************************************/

Сору

CopyFile

FileSystemObject

force

false

Delete 

force

true

Delete

DeleteFile

FileSystemObject

destination

Move

MoveFile

FileSystemObject

iomode

OpenTextFile

FileSystemObject

format

format 

OpenTextFile

FileSystemObject

OpenTextFile

FileSystemObject

/*******************************************************************/

/* Имя: WriteTextFile.js                      */

/* Язык: JScript                          */

/* Описание: Запись строк в текстовый файл и чтение из него     */

/*******************************************************************/

var FSO,F,TextStream,s;  //Объявляем переменные

//Инициализируем константы

var ForReading = 1, ForWriting = 2, TristateUseDefault = -2;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем в текущем каталоге файл test1.txt

FSO.CreateTextFile("test1.txt"); 

//Создаем объект File для файла test1.txt

F=FSO.GetFile("test1.txt");

//Создаем объект TextStream (файл открывается для записи)

TextStream=F.OpenAsTextStream(ForWriting, TristateUseDefault);

//Записываем в файл строку

TextStream.WriteLine("Это первая строка");

//Закрываем файл

TextStream.Close();

//Открываем файл для чтения

TextStream=F.OpenAsTextStream(ForReading, TristateUseDefault);

//Считываем строку из файла

s=TextStream.ReadLine();

//Закрываем файл 

TextStream.Close();

//Отображаем строку на экране

WScript.Echo("Первая строка из файла test1.txt:\n\n",s);

/*************  Конец *********************************************/

Коллекция Files

Коллекция

Files

File

Files

Folder

Files

File

var FSO, F, Files;

FSO=WScript.CreateObject("Scripting.FileSystemObject");

F=FSO.GetFolder("С:\\Мои документы");

Files=F.Files;

Как и рассмотренные выше коллекции

Drives

Folders

Files

Count

Item

Для доступа в цикле ко всем элементам коллекции

Files

Enumerator

Рис. 5.6. Список всех файлов в специальной папке "Мои документы"

/*******************************************************************/

/* Имя: ListFiles.js                        */

/* Язык: JScript                          */

/* Описание: Получение списка всех файлов заданного каталога    */

/*******************************************************************/

//Объявляем переменные

var FSO,F,Files,WshShell,PathList,s;

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект WshShell

WshShell=WScript.CreateObject("Wscript.Shell");

//Создаем объект WshSpecialFolders

WshFldrs=WshShell.SpecialFolders;

//Определяем путь к папке "Мои документы"

PathList=WshFldrs.item("MyDocuments")+"\\";

//Создаем объект Folder для папки "Мои документы"

F=FSO.GetFolder(PathList);

//Создаем коллекцию файлов каталога "Мои документы"

Files=new Enumerator(F.Files);

s = "Файлы из каталога "+PathList+"\n";

//Цикл по всем файлам

for (; !Files.atEnd(); Files.moveNext()) 

 //Добавляем строку с именем файла

 s+=Files.item().Name+"\n";

//Выводим полученные строки на экран

WScript.Echo(s);

/*************  Конец *********************************************/

Объект TextStream

Объект

TextStream

Создать объект

TextStream

□

CreateTextFile

FileSystemObject

Folder

□

OpenTextFile

FileSystemObject

□

OpenAsTextStream

File

В следующем примере переменная

F

//Создаем объект FileSystemObject

var FSOWScript.CreateObject("Scripting. FileSystemObject");

//Создаем текстовый файл

var F=FSO.CreateTextFile("C:\\TestFile.txt", true);

//Записываем строку в файл

F.WriteLine("Строка текста");

//Закрываем файл

F.Close();

Свойству объекта TextStream описаны в табл. 5.12.

Таблица 5.12. Свойства объекта

TextStream

AtEndOfLine

true

false

AtEndOfStream

true

false

Column

Line

Методы объекта

TextStream

Таблица 5.13. Методы объекта

TextStream

Close()

Read(n)

n

ReadAll()

ReadLine()

Skip(n)

n

SkipLine()

Write(string)

string

WriteBlankLines(n)

n

WriteLine([string])

string

string

В листинге 5.15 приведен сценарий TextFile.js, иллюстрирующий использование методов объекта

TextStream

Рис. 5.7. Результат работы сценария TextFile.js

/*******************************************************************/

/* Имя: TextFile.js                         */

/* Язык: JScript                          */

/* Описание: Работа с текстовым файлом (запись и чтение информации)*/

/*******************************************************************/

var FSO,F,s;  //Объявляем переменные

var ForReading = 1; //Инициализируем константы

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем на диске C: текстовый файл TestFile.txt

F=FSO.CreateTextFile("C:\\TestFile.txt", true);

//Записываем в файл первую строку 

F.Write("Это ");

F.WriteLine("первая строка");

//Записываем в файл пустую строку

F.WriteBlankLines(1);

//Записываем в файл третью строку 

F.WriteLine("Это третья строка");

//Закрываем файл

F.Close();

//Открываем файл для чтения

F=FSO.OpenTextFile("C:\\TestFile.txt", ForReading);

//Пропускаем в файле две первые строки

F.SkipLine();

F.SkipLine();

s="Третья строка из файла C:\\TestFile.txt:\n";

//Считываем из файла третью строку

s+=F.ReadLine();

//Выводим информацию на экран

WScript.Echo(s);

/*************  Конец *********************************************/

Ниже подробно рассмотрены несколько завершенных сценариев, иллюстрирующих работу с файловой системой компьютера.

Отчет об использовании дискового пространства

Напишем сценарий DrivesReport.js, который будет создавать таблицу использования дискового пространства для дисков всех типов (съемных, жестких и сетевых), имеющихся на компьютере, в следующем формате:

Для этого в сценарии вывод информации производится в текстовый файл rep.txt (переменная

RepFile

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Запускаем Блокнот (notepad.exe) и открываем в нем файл rep.txt

WshShell.Run("notepad.exe rep.txt"); 

Данные об одном диске формируются в функции

WriteDriveInfo(drive)

drive

r

Drive

LoopDrives()

// Функция для перебора в цикле всех устройств (дисков)

function LoopDrives() {

 var Drives;

 //Создаем коллекцию дисков 

 Drives = new Enumerator( FSO.Drives );

 //Цикл по всем дискам

 for(; !Drives.atEnd(); Drives.moveNext()) WriteDriveInfo(Drives.item());

}

Рис. 5.8. Сформированный отчет об использовании дискового пространства

В функции

WriteDriveInfo(drive)

drive 

IsReady

Drive

true

TotalSize

FreeSpace

DriveLetter

FreeSpace

//Вычисляем общий объем диска в мегабайтах

Total = Math.round(drive.TotalSize/1048576);

//Вычисляем объем свободного пространства в мегабайтах

Free = Math.round(drive.FreeSpace/1048576);

//Вычисляем объем использованного пространства в мегабайтах

Used = Total - Free;

//Определяем букву диска

DriveLetter=drive.DriveLetter+":";

//Определяем метку тома

VolumeName=drive.VolumeName;

Строки с полученными значениями затем приводятся к нужному виду с помощью вспомогательных функций

LFillStr

FillStr

RepFile

RepFile.WriteLine("+---------------------------------------------------+");

//Записываем информацию о букве диска

s="|"+FillStr(51,"Диск "+DriveLetter)+"|";

RepFile.WriteLine(s);

RepFile.WriteLine("+---------------------------------------------------+");

//Записываем информацию о метке тома

s="|"+LFillStr(25,"Метка тома: "+VolumeName)+"|";

//Записываем информацию об общем объеме диска

s+=LFillStr(25,"Общий объем, Mb: "+Total)+"|";

RepFile.WriteLine(s);

RepFile.WriteLine("+---------------------------------------------------+");

//Записываем информацию об использованном пространстве 

s="|"+LFillStr(25,"Используется, Mb: "+Used.toString())+"|";

//Записываем информацию о свободном пространстве 

s+=LFillStr(25,"Свободно, Mb: "+Free.toString())+"|";

RepFile.WriteLine(s);

RepFile.WriteLine("+---------------------------------------------------+");

Если же устройство

drive

IsReady

false

DriveType

DriveType=3

if (drive.DriveType == 3) { //Проверяем, является ли диск сетевым

 //Записываем информацию о букве диска

 RepFile.WriteLine( "Диск " + drive.DriveLetter + " является сетевым" );

 //Записываем пустые строки

 RepFile.WriteLine();

 RepFile.WriteLine();

} else {

 //Устройство не готово

 RepFile.WriteLine( "Устройство " + drive.DriveLetter + ": не готово" );

 //Записываем пустые строки

 RepFile.WriteLine();

 RepFile.WriteLine();

}

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

/*******************************************************************/

/* Имя: DrivesReport.js                       */

/* Язык: JScript                          */

/* Описание: Формирование отчета об использовании дискового     */

/*      пространства для всех устройств на компьютере     */

/*******************************************************************/

//Объявляем переменные

var FSO, RepFile, MDate,WshShell, ForWriting = 2;

// Функция для перебора в цикле всех устройств (дисков)

function LoopDrives() {

 var Drives;

 //Создаем коллекцию дисков 

 Drives = new Enumerator( FSO.Drives );

 //Цикл по всем дискам

 for(; !Drives.atEnd(); Drives.moveNext()) WriteDriveInfo(Drives.item());

}

// Функция для вывода информации об одном устройстве (диске)

function WriteDriveInfo(drive) {

 var s,Total,Free,Used,DriveLetter,VolumeName;

 if (drive.IsReady) { //Проверяем готовность устройства

  //Вычисляем общий объем диска в мегабайтах

  Total = Math.round(drive.TotalSize/1048576);

  //Вычисляем объем свободного пространства в мегабайтах

  Free = Math.round(drive.FreeSpace/1048576);

  //Вычисляем объем использованного пространства в мегабайтах

  Used = Total - Free;

  //Определяем букву диска

  DriveLetter=drive.DriveLetter+":";

  //Определяем метку тома

  VolumeName=drive.VolumeName;

  RepFile.WriteLine("+---------------------------------------------------+");

  //Записываем информацию о букве диска

  s="|"+FillStr(51,"Диск "+DriveLetter)+"|";

  RepFile.WriteLine(s);

  RepFile.WriteLine("+---------------------------------------------------+");

  //Записываем информацию о метке тома

  s="|"+LFillStr(25,"Метка тома: "+VolumeName)+"|";

  //Записываем информацию об общем объеме диска

  s+=LFillStr(25,"Общий объем, Mb: "+Total)+"|";

  RepFile.WriteLine(s);

  RepFile.WriteLine("+---------------------------------------------------+");

  //Записываем информацию об использованном пространстве 

  s="|"+LFillStr(25,"Используется, Mb: "+Used.toString())+"|";

  //Записываем информацию о свободном пространстве 

  s+=LFillStr(25,"Свободно, Mb: "+Free.toString())+"|";

  RepFile.WriteLine(s);

  RepFile.WriteLine("+---------------------------------------------------+");

  //Записываем пустые строки

  RepFile.WriteLine();

  RepFile.WriteLine();

 } else if (drive.DriveType == 3) { //Проверяем, является ли диск сетевым

  //Записываем информацию о букве диска

  RepFile.WriteLine( "Диск " + drive.DriveLetter + " является сетевым" );

  //Записываем пустые строки

  RepFile.WriteLine();

  RepFile.WriteLine();

 } else {

  //Устройство не готово

  RepFile.WriteLine( "Устройство " + drive.DriveLetter + ": не готово" );

  //Записываем пустые строки

  RepFile.WriteLine();

  RepFile.WriteLine();

 }

}

/*******************  Начало  **********************************/

//Создаем объект FileSystemObject

FSO = WScript.CreateObject("Scripting.FileSystemObject");

//Открываем файл rep.txt

RepFile = FSO.OpenTextFile("rep.txt", ForWriting, true);

//Определяем текущую дату и время

MDate = new Date();

//Записываем дату и время в отчет

RepFile.WriteLine("Дата отчета: " + MDate);

RepFile.WriteLine();

//Вызываем функцию LoopDrives

LoopDrives();

//Закрываем файл rep.txt

RepFile.Close();

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Запускаем Блокнот (notepad.exe) и открываем в нем файл rep.txt

WshShell.Run("notepad.exe rep.txt");

/*************  Конец *********************************************/

// Вспомогательные функции  

//Выравнивание строки s вправо в поле длиной l символов

function RFillStr(l,s) {  

 var ss,i,ll;

 ll=l-s.length;

 if (s.length>=l) {

  return(s);

 } else {

  ss=s;

  for (i=1;i<=ll;i++) {

  ss=" "+ss;

  }

  return(ss);

 }

}

//Выравнивание строки s влево в поле длиной l символов

function LFillStr(l,s) {

 var ss,i,ll;

 ll=l-s.length;

 if (s.length>=l) {

  return(s);

 } else {

  ss=s;

  for (i=1;i<=ll;i++) {

  ss=ss+" ";

  }

  return(ss);

 }

}

//Выравнивание строки s по центру в поле длиной l символов

function FillStr(l,s) {

 var ss,i,ll,s1,l2;

 ll=l-s.length;

 if (s.length>=l) {

  return(s);

 } else {

  ss=s;

  l2=Math.round((l-s.length)/2);

  ss=LFillStr(s.length+l2,s);

  ss=RFillStr(l,ss);

  return(ss);

 }

}

Удаление ненужных временных файлов с жесткого диска

В результате некорректного завершения приложений на жестком диске часто остаются "бесхозные" временные файлы (с расширением tmp), которые затем приходится удалять вручную. Весьма удобно было бы удалять все такие файлы сразу со всего жесткого диска, не заботясь о том, в каких каталогах они находятся. Используя стандартные средства операционной системы, можно сначала с помощью пункта Найти (Find) меню Пуск (Start) составить список всех временных файлов (рис. 5.9), затем выделить все файлы в этом списке и нажать комбинацию клавиш + (удаление файлов без помещения в Корзину).

Однако если хотя бы один из временных файлов будет занят каким-либо приложением, то в доступе к нему будет отказано и процесс удаления прервется (рис. 5.10).

Поэтому для удаления с жесткого диска всех временных файлов мы напишем сценарий DelTmp.js (основная идея, которая используется в данном сценарии, позаимствована из статьи [6]).

Алгоритм работы сценария состоит в следующем:

□ в Блокноте (notepad.exe) создается новый файл для отображения в нем результатов работы;

□ на диске D: просматриваются подкаталоги всех уровней вложенности;

□ в каждом подкаталоге ищутся все временные файлы с расширением tmp;

□ для каждого найденного временного файла производится попытка удаления. В случае успеха в Блокноте печатается путь к файлу и слово "OK", если же удаляемый файл занят, то печатается путь к файлу и слово "Busy" ("Занят");

□ после просмотра всех каталогов в Блокноте печатается общее количество найденных временных файлов (рис. 5.11).

Рис. 5.9. Список всех временных файлов на диске D:

Рис. 5.10. Ошибка, возникающая при попытке удалить занятый файл

Итак, наиболее важными в сценарии являются: функция

DelFilesInFolder(Fold, SExt)

SExt

LoopSubFolders(Fold)

DelFilesInFolder

Рис. 5.11. Результат работы сценария DelTmp.js

Рассмотрим сначала функцию

DelFilesInFolder(Fold, SExt)

Enumerator

Files

var Files, s, SPath, FileExt, Status;

Files=new Enumerator(Fold.Files);

после чего все элементы коллекции просматриваются в цикле while:

s="";

//Цикл по всем файлам

while (!Files.atEnd()) {

 …

 Files.moveNext(); //Переходим к следующему файлу

}

Для текущего файла в коллекции выделяется его расширение, которое преобразуется к верхнему регистру:

//Определяем путь к файлу

SPath=Files.item().Path;

//Выделяем расширение файла

FileExt=FSO.GetExtensionName(SPath).toUpperCase();

В случае совпадения расширения

FileExt

SExt

try…catch

ColTmp++; //Увеличиваем счетчик файлов для удаления

try {

 Status="Ok";

 //Пытаемся удалить файл

 Files.item().Delete();

} catch (e) {

 //Обрабатываем возможные ошибки

 if (е != 0) {

 //Произошла ошибка при удалении файла

 Status="Busy";

 }

}

Таким образом, в переменной

Status

Status

SendKeys

WshShell

SendKeys

//Заменяем специальные символы в названии файла

SPath=SPath.replace("~", "{-}");

SPath=SPath.replace("+", "{+}");

SPath=SPath.replace("^", "{^}");

SPath=SPath.replace("%", "{%}");

//Посылаем название файла и результат его удаления в Блокнот

WshShell.SendKeys(SPath+"{TAB}"+Status+"~");

//Приостанавливаем сценарий на 0,5 сек

WScript.Sleep(500);

Перейдем теперь к описанию функции

LoopSubFolders(Fold)

//Удаляем временные файлы из каталога Fold

DelFilesInFolder(Fold, ExtForDel);

Затем происходит удаление файлов во всех подкаталогах каталога Fold, причем делается это с помощью обращения для каждого подкаталога к той же функции

LoopSubFolders

//Создаем коллекцию подкаталогов

SubFolders = new Enumerator(Fold.SubFolders);

//Цикл по всем подкаталогам

while (!SubFolders.atEnd()) {

 //Вызываем рекурсивно функцию LoopSubFolders

 LoopSubFolders(SubFolders.item());

 //Переходим к следующему подкаталогу

 SubFolders.moveNext();

}

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

/*******************************************************************/

/* Имя: DelTmp.js                          */

/* Язык: JScript                          */

/* Описание: Удаление временных файлов во всех подкаталогах     */

/*      текущего каталога                   */

/*******************************************************************/

//Объявляем глобальные переменные

var WshShell,FSO,Folder,

 ColTmp=0,     //Счетчик файлов для удаления

 ExtForDel="tmp"; //Расширение файлов, подлежащих удалению

//Рекурсивная функция для удаления временных файлов в каталоге Fold

function LoopSubFolders(Fold) {

 var SubFolders;

 //Удаляем временные файлы из каталога Fold

 DelFilesInFolder(Fold,ExtForDel);

 //Создаем коллекцию подкаталогов

 SubFolders = new Enumerator(Fold.SubFolders);

 //Цикл по всем подкаталогам

 while (!SubFolders.atEnd()) {

  //Вызываем рекурсивно функцию LoopSubFolders

  LoopSubFolders(SubFolders.item());

  //Переходим к следующему подкаталогу

  SubFolders.moveNext();

 }

}

//Функция для удаления файлов с расширением SExt в каталоге Fold

function DelFilesInFolder(Fold,SExt) {

 //Объявляем переменные

 var Files,s,SPath,FileExt,Status;

 //Создаем коллекцию всех файлов в каталоге Fold

 Files=new Enumerator(Fold.Files);

 s="";

 //Цикл по всем файлам

 while (!Files.atEnd()) {

  //Определяем путь к файлу

  SPath=Files.item().Path;

  //Выделяем расширение файла

  FileExt=FSO.GetExtensionName(SPath).toUpperCase();

  //Сравниваем расширение файла с расширением SExt

  if (FileExt==SExt.toUpperCase()) {

  ColTmp++; //Увеличиваем счетчик файлов для удаления

  try {

   Status="Ok";

   //Пытаемся удалить файл

   //Files.item().Delete();

  } catch (e) { //Обрабатываем возможные ошибки

   if (e != 0) {

   //Произошла ошибка при удалении файла

   Status="Busy";

   }

  }

  //Заменяем специальные символы в названии файла

  SPath=SPath.replace("~","{~}");

  SPath=SPath.replace("+","{+}");

  SPath=SPath.replace("^","{^}");

  SPath=SPath.replace("%","{%}");

  //Посылаем название файла и результат его удаления

  //в Блокнот

  WshShell.SendKeys(SPath+"{TAB}"+Status+"~");

  //Приостанавливаем сценарий на 0,5 сек

  WScript.Sleep(500);

  }

  Files.moveNext();  //Переходим к следующему файлу

 }

}

/*******************  Начало  **********************************/

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Запускаем Блокнот

theNotepad = WshShell.Exec("Notepad");

//Приостанавливаем сценарий на 0,5 сек

WScript.Sleep(500);

//Активизируем окно Блокнота

WshShell.AppActivate(theNotepad.ProcessID);

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Определяем каталог, с которого будет начато удаление файлов

Folder = FSO.GetFolder("D:\\");

//Вызываем функцию LoopSubFolder для каталога Folder

LoopSubFolders(Folder);

//Формируем информацию о количестве обработанных файлов

SItog="Total: "+ColTmp+ " file(s)";

//Посылаем в Блокнот итоговую информацию

WshShell.SendKeys(SItog);

/*************  Конец *********************************************/

Поиск файлов с использованием регyлярных выражений

Всем хорошо известно, что для поиска файлов и папок с помощью стандартных средств Windows в именах можно использовать подстановочные символы "?" (обозначает любой один символ) и "*" (обозначает любое число любых символов). Например, на рис. 5.12 представлен результат поиска файлов *.sys (все файлы с расширением sys) на диске С:.

Рис. 5.12. Использование подстановочных символов при поиске файлов

В сценариях WSH можно производить поиск файлов (как и любого другого текста) с помощью гораздо более сложных правил для определения соответствий. Для этого используются регулярные выражения, которые определяют образец текста для поиска. Для задания этого образца используются литералы и метасимволы. Каждый символ, который не имеет специального значения в регулярных выражениях, рассматривается как литерал и должен точно совпасть при поиске. Метасимволы — это символы со специальным значением в регулярных выражениях. Описание наиболее часто используемых метасимволов приведено в табл. 5.14.

Таблица 5.14. Некоторые метасимволы, использующиеся в регулярных выражениях

\

n

\n

\\

\(

^

$

*

zo*

+

zo+

?

.

х|у

z|food

[xyz]

[abc]

[a-z]

[a-z]

[^m-z]

[^m-z]

\b

er\b

\В

еа*r\B

\d

[0-9]

\D

[^0-9]

Метасимволы можно употреблять совместно, например, комбинация

".*"

В качестве примера использования регулярных выражений в листинге 5.18 приведен сценарий FindRegExp.js, в котором производится поиск в подкаталоге ForFind текущего каталога всех файлов, имена которых начинаются с символов "П", "А" или "И" и имеют расширение txt.

Для получения доступа к каталогу ForFind в сценарии используется метод

GetFolder

FileSystemObject

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект Folder для доступа к подкаталогу ForFind

//текущего каталога

Folder = FSO.GetFolder(WshShell.CurrentDirectory+"\\ForFind");

Поиск нужных файлов будет выполняться с помощью следующего регулярного выражения:

//Создаем регулярное выражение (объект RegExp)

RegEx=new RegExp("^[ПАИ].*\.txt$", "i");

Сам поиск и вывод имен найденный файлов производятся в функции

FindFilesInFolder(Fold, RegEx)

Enumerator

Files

Fold

ColFind=0; //Счетчик найденных файлов

SFileNames=""; //Строка с именами файлов

//Создаем коллекцию файлов в каталоге Fold

Files=new Enumerator(Fold.Files);

Элементы коллекции просматриваются в цикле

while

//Цикл по всем файлам в коллекции

while (!Files.atEnd()) {

 Files.moveNext(); //Переходим к следующему файлу

}

Для текущего файла в коллекции выделяется его имя, которое затем с помощью метода

test

RegExp

//Выделяем имя файла

SName=Files.item().Name;

//Проверяем, соответствует ли имя файла регулярному выражению

if (RegEx.test(SName)) {

 ColFind++; //Увеличиваем счетчик найденных файлов

 //Добавляем имя файла к переменной SFileNames

 SFileNames+=SName+ " \n";

}

В конце функции

FindFilesInFolder(Fold, RegEx)

SItog="Найдено файлов: "+ColFind;

//Выводим на экран имена и количество найденных файлов

WScript.Echo(SFileNames+SItog);

/*******************************************************************/

/* Имя: FindRegExp.js                        */

/* Язык: JScript                          */

/* Описание: Поиск файлов, имена которых соответствуют заданному  */

/*      регулярному выражению                 */

/*******************************************************************/

//Объявляем переменные

var WshShell,FSO,Folder,ColFind,RegExp,SFileNames;

//Функция для поиска файлов в заданном каталоге

function FindFilesInFolder(Fold,RegEx) {

 var Files,SName; //Объявляем переменные

 ColFind=0; //Счетчик найденных файлов

 SFileNames=""; //Строка с именами файлов

 //Создаем коллекцию файлов в каталоге Fold

 Files=new Enumerator(Fold.Files);

 //Цикл по всем файлам в коллекции

 while (!Files.atEnd()) {

  //Выделяем имя файла

  SName=Files.item().Name;

  //Проверяем, соответствует ли имя файла регулярному 

  //выражению

  if (RegEx.test(SName)) {

  ColFind++; //Увеличиваем счетчик найденных файлов

  //Добавляем имя файла к переменной SFileNames

  SFileNames+=SName+"\n"; 

  }

  Files.moveNext(); //Переходим к следующему файлу

 }

 SItog="Найдено файлов: "+ColFind;

 //Выводим на экран имена и количество найденных файлов

 WScript.Echo(SFileNames+SItog);

}

/*******************  Начало  **********************************/

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Создаем объект Folder для доступа к подкаталогу ForFind

//текущего каталога

Folder = FSO.GetFolder(WshShell.CurrentDirectory+"\\ForFind");

//Создаем регулярное выражение (объект RegExp)

RegExp=new RegExp("^[ПАИ].*\.txt$","i");

//Ищем файлы, имена которых соответствуют регулярному

//выражению RegExp в каталоге Folder

FindFilesInFolder(Folder,RegExp);

/*************  Конец *********************************************/

Перемещение файлов с ведением журнала действий

Поставим перед собой следующую задачу. Пусть в заданный каталог на жестком диске (например, C:\In) поступают из почтовой программы или по локальной сети файлы с различными расширениями. Требуется выделить из них все файлы с заданным расширением (например, 003) и перенести их в другой каталог (например, C:\Out). При этом необходимо вести журнал операций (log-файл), в который для каждого переносимого файла записывать следующую информацию: имя файла, дату и время его создания, дату и время перемещения файла. Структура log-файла (в нашем случае это файл C:\In\log.txt) должна быть следующей:

Имя файла (Дата и время создания) Дата и время перемещения

Например:

34556.003   (19/10/2002 10:45) 19/10/2002 11:02

43432_KL.003 (19/10/2002 10:45) 19/10/2002 11:02

45.003    (19/10/2002 10:45) 19/10/2002 11:02

        ...

Кроме этого, во время перемещения файлов на экран должна выводиться информация о том, какой именно файл обрабатывается, а после завершения работы сценария нужно напечатать общее количество перемещенных файлов (рис. 5.13).

Рис. 5.13. Информация о перемещении файлов

Поставленную задачу выполняет рассматриваемый ниже сценарий MoveLog.js; запускать этот сценарий следует в консольном режиме с помощью cscript.exe.

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

Source

Dest

var

 Source="C:\\In\\", //Путь к каталогу-источнику файлов для перемещения

 Dest="C:\\Out\\"; //Путь к целевому каталогу

В переменных

Mask

PathLog

var

 Mask="003", //Расширение файлов для перемещения

 PathLog="C:\\In\\log.txt"; //Путь к log-файлу

Сначала в сценарии с помощью метода

FolderExists

FileSystemObject

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Проверяем наличие каталога-источника

if (!FSO.FolderExists(Source)) {

 //Выводим сообщение об отсутствии каталога-источника

 WScript.Echo("Каталог-источник", Source, "не существует.");

 WScript.Echo("Нажмите Enter...");

 WScript.StdIn.ReadLine();

 //Выходим из сценария

 WScript.Quit();

}

Аналогичным образом проверяется наличие целевого каталога:

//Проверяем наличие целевого каталога

if (!FSO.FolderExists(Dest)) {

 //Выводим сообщение об отсутствии целевого каталога

 WScript.Echo("Целевой каталог", Dest, "не существует.");

 WScript.StdIn.ReadLine();

 WScript.StdIn.ReadLine();

 //Выходим из сценария

 WScript.Quit();

}

После этого создается объект

Enumerator

Files

//Создаем объект Folder для каталога-источника Fold=FSO.GetFolder(Source);

//Создаем объект Enumerator для доступа к коллекции файлов

//в каталоге-источнике

Files=new Enumerator(Fold.Files);

Операции записи информации в log-файл и непосредственно переноса файлов из одного каталога в другой реализованы соответственно в функциях

WriteLog()

MoveFiles()

В функции

WriteLog()

var s, ss, s1, d, File, FLog;

WScript.Echo(" ");

WScript.Echo("Записываем информацию в log-файл...");

//Открываем log-файл для добавления

FLog=FSO.OpenTextFile(PathLog, ForAppending, true);

Затем в цикле

while

//Переходим к первому элементу коллекции файлов

Files.moveFirst();

//Цикл по всем файлам в коллекции

while (!Files.atEnd()) {

 //Извлекаем текущий файл из коллекции

 File=Files.item();

 //Переходим к следующему файлу в коллекции

 Files.moveNext();

}

Если файл подлежит перемещению (расширение этого файла совпадает с расширением файлов для перемещения), то определяется его имя (свойство Name), дата создания (свойство DateCreated) и текущая дата (объект Date), и в log-файл записывается соответствующая информация:

//Выделяем расширение файла

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);

}

Записываемая в log-файл строка формируется в нужном виде с помощью вспомогательных функций

LFillStr

DateToStr

TimeTostr

В функции

MoveFiles()

WriteLog()

while

Copy

Delete

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();

}

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

WScript.Echo("Перемещено файлов:", Col);

WScript.Echo("Нажмите Enter...");

WScript.StdIn.ReadLine();

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

/*******************************************************************/

/* Имя: 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();

 }

 //Выводим информацию о количестве перемещенных файлов

 WScript.Echo("");

 WScript.Echo("Перемещено файлов:",Col); 

 WScript.Echo("Нажмите Enter...");

 WScript.StdIn.ReadLine();

}

/*******************  Начало  **********************************/

//Создаем объект FileSystemObject

FSO=WScript.CreateObject("Scripting.FileSystemObject");

//Проверяем наличие каталога-источника

if (!FSO.FolderExists(Source)) {

 //Выводим сообщение об отсутствии каталога-источника

 WScript.Echo("Каталог-источник",Source,"не существует.");

 WScript.Echo("Нажмите Enter...");

 WScript.StdIn.ReadLine();

 //Выходим из сценария

 WScript.Quit();

}

//Проверяем наличие целевого каталога

if (!FSO.FolderExists(Dest)) {

 //Выводим сообщение об отсутствии целевого каталога

 WScript.Echo("Целевой каталог",Dest,"не существует.");

 WScript.StdIn.ReadLine();

 WScript.StdIn.ReadLine();

 //Выходим из сценария

 WScript.Quit();

}

//Создаем объект Folder для каталога-источника

Fold=FSO.GetFolder(Source);

//Создаем объект Enumerator для доступа к коллекцию файлов 

//в каталоге-источнике

Files=new Enumerator(Fold.Files);

//Записываем информацию в log-файл

WriteLog();

//Перемещаем файлы в целевой каталог

MoveFiles();

/*************  Конец *********************************************/

// Вспомогательные функции  

//Дополнение строки ss ведущими нулями до длины ll

function LeadZero(ll,ss) {

 var i,s,l1;

 s=ss.toString();

 l1=s.length;

 if (l1<=ll) {

  for (i=1;i<=ll-l1;i++) s="0"+s;

 }

 return(s);

}

//Формирование из объекта Date строки формата ДД/ММ/ГГГГ 

function DateToStr(dd) {

 var s;

 s=LeadZero(2,dd.getDate())+"/";

 s+=LeadZero(2,dd.getMonth()+1)+"/";

 s+=dd.getYear();

 return(s);

}

//Формирование из объекта Date строки формата ЧЧ:ММ 

function TimeToStr(dd) {

 var s;

 s=LeadZero(2,dd.getHours())+":"+LeadZero(2,dd.getMinutes());

 return(s);

}

//Выравнивание строки s влево в поле длиной l символов

function LFillStr(l,s) {

 var ss,i,ll;

 ll=l-s.length;

 if (s.length>=l) {

  return(s);

 } else {

  ss=s;

  for (i=1;i<=ll;i++) {

  ss=ss+" ";

  }

  return(ss);

 }

}

Разработка записной книжки в формате текстового файла

Последний пример, который мы рассмотрим в этой главе, посвящен обработке данных, хранящихся в текстовом файле с разделителями (это может быть, например, выборка из электронной таблицы, базы данных и т.п.).

Предположим, что имеется файл book.txt, содержащий информацию из записной книжки в следующем формате:

Фамилия|Имя|Телефон|Улица|Дом|Кв.|Примечание

В качестве примера мы будем рассматривать файл book.txt, приведенный в листинге 5.20.

Потапов|Сергей|55-55-55|Моховая|3|10|Без примечаний

Попов|Андрей|56-56-56|Ленина|3|5|Без примечаний

Иванов|Иван|17-17-17|Садовая|4|6|Очень хороший человек

Казаков|Сергей|24-19-68|Полежаева|101|22|Тоже очень хороший человек

Ниже приведен сценарий SortName.js, который реализует одну из функций для работы с записной книжкой — в результате работы этого сценария все записи из book.txt сортируются по фамилии и отображаются в Блокноте (рис. 5.14).

Опишем кратко алгоритм работы сценария SortName.js.

1. Информация из файла book.txt считывается в массив

PersonArr

Person

2. Массив

PersonArr

3. Содержимое всех записей из массива

PersonArr

4. Файл out.txt открывается в Блокноте.

Как мы видим, взаимодействие с текстовым файлом данных происходит только при загрузке его содержимого в массив. Поэтому остальная часть сценария не зависит от формата файла с данными и может в дальнейшем применяться без изменений для обработки файлов в XML-формате.

Рис. 5.14. Содержимое записной книжки (сортировка по фамилии)

Запускной функцией в SortName.js является функция

Main()

function Main() {

 //Создаем объект WshShell

 WshShell = WScript.CreateObject("WScript.Shell");

 //Определяем пути к файлам

 InitPath();

 //Создаем объект FileSystemObject

 FSO=WScript.CreateObject("Scripting.FileSystemObject");

 //Открываем выходной файл для записи

 FOut=FSO.OpenTextFile(PathOut,ForWriting,true);

 //Печатаем заголовок отчета

 TopReport("Сортировка по фамилии");

 //Выводим содержимого файла с данными

 ListFile();

 //Печатаем итоговую информацию

 BottomReport();

 //Открываем выходной файл в Блокноте

 MakeOut();

}

Итак, основная работа по формированию выходного файла, который затем будет открыт в Блокноте, производится в функции

ListFile()

FileToArray()

ListPersonArray()

function ListFile() {

 //Считывание данных из файла в массив

 FileToArray();

 //Запись информации из массива в выходной файл

 ListPersonArray();

}

Опишем сначала функцию

FileToArray()

PersonArr

while

ReadLine

ss

split

PersonToArray()

PersonArr

function FileToArray() {

var s,ss;

 //Открываем файл с данными для чтения

 FBook=FSO.OpenTextFile(PathBook,ForReading,true);

 //Создаем массив PersonArr

 PersonArr=new Array();  

 //Читаем содержимое файла FBook

 while (!FBook.AtEndOfStream) {

  //Считываем строку

  s=FBook.ReadLine();

  //Записываем содержимое строки s в массив ss

  ss = s.split("|");

  //Добавляем новый элемент в массив объектов Person

  PersonToArray(ss);

 }

 //Закрываем файл

 FBook.Close();

}

В функции

PersonToArray(sArr)

sArr

PersonRec

Person

PersonRec

PersonArr

function PersonToArray(sArr) {

 //Создаем новый объект Person

 PersonRec=new Person(sArr[0], sArr[1], sArr[2], sArr[3], sArr[4], sArr[5], sArr[6]);

 //Сохраняем объект Person в массиве

 PersonArr[PersonArr.length]=PersonRec;

}

Конструктор объекта

Person

function Person(LastName,Name,Phone,Street,House,App,Note) {

 this.LastName=LastName; //Фамилия

 this.Name=Name;     //Имя

 this.Phone=Phone;    //Телефон

 this.Street=Street;   //Улица

 this.House=House;    //Дом

 this.App=App;      //Квартира

 this.Note=Note;     //Примечание

}

Перейдем теперь к рассмотрению функции

ListPersonArray()

function ListPersonArray() {

var i;

 //Сортировка массива по фамилии

 PersonArr.sort(SortLastName);

 //Цикл по всем элементам массива PersonArr

 for (i=0;i<=PersonArr.length-1;i++) {

  //Запись информации в выходной файл

  PrintPerson(PersonArr[i]);

 }

}

Сначала здесь производится сортировка массива

PersonArr

sort

SortLastName

function SortLastName(Pers1,Pers2) {

 if (Pers1.LastName

 else if (Pers1.LastName==Pers2.LastName) return 0;

 else return 1;

}

PrintPerson(PersRec)

function PrintPerson(PersRec) {

 FOut.WriteLine("Фамилия : "+PersRec.LastName);

 FOut.WriteLine("Имя : "+PersRec.Name);

 FOut.WriteLine("Телефон: "+PersRec.Phone);

 FOut.WriteLine("Улица: "+PersRec.Street);

 FOut.WriteLine("Дом: "+PersRec.House);

 FOut.WriteLine("Кв.: "+PersRec.App);

 FOut.WriteLine("Заметки: "+PersRec.Note);

 FOut.WriteLine("*********************************");

 //Увеличиваем счетчик числа записей

 NomRec++;

}

/*******************************************************************/

/* Имя: SortName.js                         */

/* Язык: JScript                          */

/* Описание: Записная книжка (данные в текстовом файле book.txt).  */

/*      Вывод всех записей с сортировкой по фамилии      */

/*******************************************************************/

//Объявляем переменные

var 

 WshShell,FSO, 

 BasePath,  //Путь к текущему каталогу

 PathBook,  //Путь к файлу с данными

 PathOut,  //Путь к выходному файлу

 FBook,   //Файл с данными

 FOut,    //Выходной файл

 NomRec=0,  //Счетчик количества записей

 PersonRec, //Объект для хранения данных об одном человеке

 PersonArr; //Массив для хранения объектов PersonRec

//Инициализируем константы для работы с файлами

var  

 ForReading=1,

 ForWriting=2;

//Конструктор объекта Person

function Person(LastName,Name,Phone,Street,House,App,Note) {

 this.LastName=LastName; //Фамилия

 this.Name=Name;     //Имя

 this.Phone=Phone;    //Телефон

 this.Street=Street;   //Улица

 this.House=House;    //Дом

 this.App=App;      //Квартира

 this.Note=Note;     //Примечание

}

//Заполнение нового элемента массива

function PersonToArray(sArr) {

 //Создаем новый объект Person

 PersonRec=new Person(sArr[0], sArr[1], sArr[2], sArr[3], sArr[4], sArr[5], sArr[6]);

 //Сохраняем объект Person в массиве

 PersonArr[PersonArr.length]=PersonRec;

}

//Создание массива объектов Person

function FileToArray() {

var s,ss;

 //Открываем файл с данными для чтения

 FBook=FSO.OpenTextFile(PathBook,ForReading,true);

 //Создаем массив PersonArr

 PersonArr=new Array();  

 //Читаем содержимое файла FBook

 while (!FBook.AtEndOfStream) {

  //Считываем строку

  s=FBook.ReadLine();

  //Записываем содержимое строки s в массив ss

  ss = s.split("|");

  //Добавляем новый элемент в массив объектов Person

  PersonToArray(ss);

 }

 //Закрываем файл

 FBook.Close();

}

//Запись в выходной файл итоговой информации

function TopReport(Mess) {

 FOut.WriteLine(Mess);

 FOut.WriteLine("--------------------");

 FOut.WriteLine("");

}

//Запись в выходной файл итоговой информации

function BottomReport() {

 FOut.WriteLine("Всего записей: "+NomRec);

}

//Запись данных из объекта Person в выходной файл

function PrintPerson(PersRec) {

 FOut.WriteLine("Фамилия : "+PersRec.LastName);

 FOut.WriteLine("Имя : "+PersRec.Name);

 FOut.WriteLine("Телефон: "+PersRec.Phone);

 FOut.WriteLine("Улица: "+PersRec.Street);

 FOut.WriteLine("Дом: "+PersRec.House);

 FOut.WriteLine("Кв.: "+PersRec.App);

 FOut.WriteLine("Заметки: "+PersRec.Note);

 FOut.WriteLine("*********************************");

 //Увеличиваем счетчик числа записей

 NomRec++;

}

//Сортировка массива и вывод его содержимого в выходной файл

function ListPersonArray() {

var i;

 //Сортировка массива по фамилии

 PersonArr.sort(SortLastName);

 //Цикл по всем элементам массива PersonArr

 for (i=0;i<=PersonArr.length-1;i++) {

  //Запись информации в выходной файл

  PrintPerson(PersonArr[i]);

 }

}

//Функция для сортировки массива по фамилии

function SortLastName(Pers1,Pers2) {

 if (Pers1.LastName

 else if (Pers1.LastName==Pers2.LastName) return 0;

 else return 1;

}

//Вывод содержимого файла с данными                      

function ListFile() {

 //Считывание данных из файла в массив

 FileToArray();

 //Запись информации из массива в выходной файл

 ListPersonArray();

}

//Просмотр содержимого выходного файла в Блокноте

function MakeOut() {

 //Закрываем выходной файл

 FOut.Close();

 //Открываем выходной файл в Блокноте

 WshShell.Run("notepad "+PathOut,1);

}

//Построение путей к файлам

function InitPath() {

 BasePath=WshShell.CurrentDirectory+"\\";

 //Путь к файлу с данными

 PathBook=BasePath+"book.txt",

 //Путь к выходному файлу

 PathOut=BasePath+"out.txt";

}

//Основная запускная функция

function Main() {

 //Создаем объект WshShell

 WshShell = WScript.CreateObject("WScript.Shell");

 //Определяем пути к файлам

 InitPath();

 //Создаем объект FileSystemObject

 FSO=WScript.CreateObject("Scripting.FileSystemObject");

 //Открываем выходной файл для записи

 FOut=FSO.OpenTextFile(PathOut,ForWriting,true);

 //Печатаем заголовок отчета

 TopReport("Сортировка по фамилии");

 //Выводим содержимого файла с данными

 ListFile();

 //Печатаем итоговую информацию

 BottomReport();

 //Открываем выходной файл в Блокноте

 MakeOut();

}

/*******************  Начало  **********************************/

Main();

/*************  Конец *********************************************/