Windows Script Host для Windows 2000/XP

}
//Заполнение полей в форме для текущей записи
function Person_LoadDialog() {
 //Заполняем поля ввода в форме значениями соответствующих
 //свойств объекта Person
 doc.all.txtLastName.value = this.LastName;
 doc.all.txtName.value=this.Name;
 doc.all.txtPhone.value=this.Phone;
 doc.all.txtStreet.value=this.Street;
 doc.all.txtHouse.value=this.House;
 doc.all.txtApp.value = this.App;
 doc.all.txtNote.value = this.Note;
}

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

Основным объектом, который обеспечивает обмен данными между XML-файлом записной книжки и разработанной нами формой, является объект ListPersons. Этот объект будет содержать три свойства и десять методов.

Первым свойством объекта ListPersons мы сделаем массив PersonArr объектов Person; этот массив будет служить промежуточным буфером при чтении данных из XML-файла для отображения в форме и при записи измененных данных из формы в файл. В остальных двух свойствах СurRecord и IsChanged объекта ListPersons будут соответственно храниться номер текущей записи и логическое значение (true или false), являющееся признаком того, были ли изменены пользователем данные в форме.

Назначение методов объекта ListPersons ясно из комментариев, которые приведены в конструкторе этого объекта (листинг 7.7). 

Листинг 7.7. Конструктор объекта ListPersons

function ListPersons() {
 //          Свойства объекта
 //Создаем массив PersonArr экземпляров объекта Person
 this.PersonArr = new Array();
 //Инициализируем номер текущей записи
 this.CurRecord = 0;
 //Сбрасываем признак изменения данных в форме
 this.IsChanged = false;
 //          Методы объекта
 //Устанавливаем для методов указатели на соответствующие функции
 this.FileToArray=ListPersons_FileToArray;
 this.SaveData=ListPersons_SaveData;
 this.LoadDialog=ListPersons_LoadDialog;
 this.RefreshDialog=ListPersons_RefreshDialog;
 this.NextRecord=ListPersons_NextRecord;
 this.PreviousRecord=ListPersons_PreviousRecord;
 this.FirstRecord=ListPersons_FirstRecord;
 this.FinalRecord=ListPersons_FinalRecord;
 this.NewRecord=ListPersons_NewRecord;
 this.DelRecord = ListPersons_DelRecord;
}

Текст всех методов объекта ListPersons с подробными комментариями приведен в листинге 7.8. 

Листинг 7.8. Методы объекта ListPersons

//Считывание данных из XML-файла в массив объектов Person
function ListPersons_FileToArray() {
 var Root,CurrNode,i;
 //Создаем объект XML DOM
 XML = WScript.CreateObject('Msxml.DOMDocument');
 //Загружаем XML-документ из файла
 XML.load(PathBook);
 //Сохраняем в переменной Root ссылку на корневой элемент
 //документа
 Root=XML.documentElement;
 //Обнуляем массив PersonArr
 this.PersonArr.length=0;
 //Перебираем все дочерние элементы первого уровня вложенности
 //для корневого элемента
 for (i=1; i<=Root.childNodes.length-1;i++) {
  //Выделяем в коллекции XML-элементов i-й элемент
  CurrNode=Root.childNodes.item(i);
  //Создаем новый экземпляр PersonRec объекта Person
  PersonRec=new Person();
  //Заполняем поля объекта PersonRec
  PersonRec.LastName=GetTagVal(CurrNode,'LastName');
  PersonRec.Name=GetTagVal(CurrNode,'Name');
  PersonRec.Phone=GetTagVal(CurrNode,'Phone');
  PersonRec.Street=GetTagVal(CurrNode,'Street');
  PersonRec.House=GetTagVal(CurrNode,'House');
  PersonRec.App=GetTagVal(CurrNode,'App');
  PersonRec.Note=GetTagVal(CurrNode,'Note');
  //Сохраняем объект PersonRec в массиве PersonArr
  this.PersonArr[this.PersonArr.length]=PersonRec;
 }
}
//Запись данных из формы в XML-файл
function ListPersons_SaveData() {
 var Root,CurrNode,ElemList;
 //Сохраняем в переменной Root ссылку на корневой элемент
 //документа
 Root=XML.documentElement;
 //Сохраняем в переменной CurrNode ссылку на (CurRecord+1)-й
 //элемент Person
 CurrNode=Root.childNodes.item(this.CurRecord+1);
 //Записываем данные из полей ввода формы в соответствующие
 //XML-элементы, которые являются дочерними узлами
 //относительно  CurrNode
 SetTagVal(CurrNode,'LastName',doc.all.txtLastName.value);
 SetTagVal(CurrNode,'Name',doc.all.txtName.value);
 SetTagVal(CurrNode,'Phone',doc.all.txtPhone.value);
 SetTagVal(CurrNode,'Street',doc.all.txtStreet.value);