Андрей Попов - 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;

}

//Создание массива объектов 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 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 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.xml",

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

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("Всего записей: "+PersonArr.length);

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

MakeOut();

}

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

Main();

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

В принципе можно добавлять информацию в записную книжку, просто записывая строки с соответствующими тегами в текстовый файл book.xml. Однако лучше для этой цели воспользоваться специальными методами XML DOM (в этом случае не нужно, например, заботиться о закрывающих тегах).

Для иллюстрации методов XML DOM, позволяющих записывать данные в XML-файл, рассмотрим сценарий AddRecord.js, в котором производится добавление в book.xml следующей записи:

Сидоров

Aнтон

18-18-18

Саранская

12

4

Запись добавлена из сценария

Процесс добавления записи в книжку осуществляется в функции AddRecord(). Здесь сначала заполняются нужными значениями поля объекта PersonRec(функция MakePersonRec()), а затем данные из PersonRecдобавляются в файл book.xml (функция RecordToFile(PersonRec)):