Андрей Попов - Windows Script Host для Windows 2000/XP

PersonRec.Street=GetTagVal(XNode,"Street");

PersonRec.House=GetTagVal(XNode,"House");

PersonRec.App=GetTagVal(XNode,"App");

PersonRec.Note=GetTagVal(XNode,"Note");

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

PersonArr[PersonArr.length]=PersonRec;

}

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

function TopReport(Mess) {

FOut.WriteLine(Mess);

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

FOut.WriteLine("");

}

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

function BottomReport(Mess) {

FOut.WriteLine(Mess);

}

//Запись данных из объекта 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 MakeOut() {

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

FOut.Close();

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

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

}

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

function InitPath() {

BasePath=WshShell.CurrentDirectory+"\\";

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

PathBook=BasePath+"book.xml",

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

PathOut=BasePath+"out.txt";

}

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

Также в отдельный файл WSHInputBox.vbs мы поместим функцию WSHinputBox( Message, Title )на языке VBScript, с помощью которой из JScript-сценариев будет выводиться диалоговое окно со строкой ввода (напомним, что ни язык JScript, ни объектная модель WSH такой функции не предоставляют):

Function WSHInputBox(Message,Title)

'Выводим диалоговое окно со строкой ввода

WSHInputBox = InputBox(Message,Title)

End Function

Сами задания из файла PhoneBook.wsf составлены (с некоторыми изменениями, на которых мы подробно останавливаться не будем) из одиночных сценариев, которые были рассмотрены в предыдущей главе: см. листинг 6.3 (просмотр всех записей в алфавитном порядке), листинг 6.4 (добавление записей) и листинг 6.5 (поиск записей по фамилии и удаление записей).

В листинге 7.3 приводится полный текст сценария PhoneBook.wsf.

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

function FileToArray() {

var XML,Root,NomRec,CurrNode,ex,i;

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

PersonArr=new Array();

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

XML = WScript.CreateObject("Msxml.DOMDocument");

//Загружаем XML-документ из файла

XML.load(PathBook);

//Сохраняем в переменной Root ссылку на корневой элемент

//документа

Root=XML.documentElement;

//Перебираем все дочерние элементы первого уровня вложенности

//для корневого элемента

for (i=1; i<=Root.childNodes.length-1;i++) {

//Выделяем в коллекции XML-элементов i-й элемент

CurrNode=Root.childNodes.item(i);

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

PersonToArray(CurrNode);

}

}

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

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 Main() {

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

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

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

InitPath();

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

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

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

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

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

TopReport("Список всех записей, сортировка по фамилии");

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

FileToArray();

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

ListPersonArray();

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

BottomReport("Всего записей: "+PersonArr.length);

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

MakeOut();

}

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

Main();

//Поиск в XML-файле нужных записей и сохранение их в