Windows Script Host для Windows 2000/XP, Попов Андрей Викторович

Windows Script Host для Windows 2000/XP

на обложку

Попов Андрей Викторович

Шрифт:

}

//Функция-обработчик нажатия на кнопку ">"

function btnNext_OnClick {

//Проверяем, были ли сделаны изменения в форме

if (objListPersons.IsChanged) { //Изменения были сделаны

//Сохраняем данные в XML-файле

objListPersons.SaveData;

//Заново загружаем данные из XML-файла в массив PersonArr

objListPersons.FileToArray;

}

//Переходим

к следующей записи в массиве

objListPersons.NextRecord;

//Загружаем в форму данные из массива PersonArr

//для текущей записи

objListPersons.LoadDialog;

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

doc.title = "Запись N " + (objListPersons.CurRecord + 1);

}

//Функция-обработчик нажатия на кнопку ">>"

function btnFinal_OnClick {

//Проверяем, были ли сделаны изменения в форме

if (objListPersons.IsChanged) { //Изменения были сделаны

//Сохраняем данные в XML-файле

objListPersons.SaveData;

//Заново загружаем данные из XML-файла в массив PersonArr

objListPersons.FileToArray;

}

//Переходим к последней записи в массиве

objListPersons.FinalRecord;

//Загружаем в форму данные из массива PersonArr

//для текущей записи

objListPersons.LoadDialog;

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

doc.title = "Запись N " + (objListPersons.CurRecord + 1);

}

//Функция-обработчик изменения текста в полях ввода

function txtBoxOnChange {

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

objListPersons.IsChanged = true;

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

doc.title = "Редактирование данных";

}

Окончательная доработка сценария IEPhoneBook.js

Выше были описаны все основные функции, которые используются для работы с записной книжкой в диалоговом режиме. Осталось лишь собрать эти функции в один JScript-сценарий IEPhoneBook.js, определить глобальные переменные и добавить вспомогательные функции

GetTagVal(obj, tgName)

SetTagVal(obj, tgName, sVal)

для доступа к значениям XML-элементов (листинг 7.13).

Листинг 7.13. Функция для доступа к значениям XML-элементов

//Определение значения тега tgName XML-элемента obj

function GetTagVal(obj, tgName) {

var ElemList;

//Создаем коллекцию дочерних для obj элементов, которые

//задаются тегом tgName

ElemList=obj.getElementsByTagName(tgName);

//Проверяем, есть ли в коллекции ElemList элементы

if (ElemList.length>0)