Чтение онлайн

на главную - закладки

Жанры

Windows Script Host для Windows 2000/XP

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

Шрифт:

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

 SetTagVal(CurrNode,"House",doc.all.txtHouse.value);

 SetTagVal(CurrNode,"App",doc.all.txtApp.value);

 SetTagVal(CurrNode,"Note",doc.all.txtNote.value);

 //Сохраняем XML-файл на диске

 XML.save(PathBook);

}

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

function ListPersons_LoadDialog {

 //Вызываем метод LoadDialog для объекта Person,

 //который является CurRecord-м элементом массива PersonArr

 this.PersonArr[this.CurRecord].LoadDialog;

}

//Обновление данных в форме

function ListPersons_RefreshDialog(IsGoTop) {

 //Обнуляем массив PersonArr

 this.PersonArr.length=0;

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

 this.FileToArray;

 if (IsGoTop)

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

this.FirstRecord

 else

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

this.FinalRecord;

 //Загружаем в форму данные для текущей записи

 this.LoadDialog;

}

//Переход к следующей записи

function ListPersons_NextRecord {

 if (this.CurRecord<this.PersonArr.length - 1)

//Если текущая запись не является последней, увеличиваем

//номер текущей записи

this.CurRecord++;

}

//Переход к предыдущей записи

function ListPersons_PreviousRecord {

 if (this.CurRecord > 0)

//Если текущая запись не является первой, уменьшаем

//номер текущей записи

this.CurRecord--;

}

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

function ListPersons_FirstRecord {

 this.CurRecord = 0;

}

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

function ListPersons_FinalRecord {

 this.CurRecord = this.PersonArr.length - 1;

}

//Добавление новой записи

function ListPersons_NewRecord {

Поделиться:
Популярные книги

Черный маг императора 3

Герда Александр
3. Черный маг императора
Фантастика:
попаданцы
аниме
5.00
рейтинг книги
Черный маг императора 3

Возвращение Безумного Бога

Тесленок Кирилл Геннадьевич
1. Возвращение Безумного Бога
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Возвращение Безумного Бога

Этот мир не выдержит меня. Том 2

Майнер Максим
2. Первый простолюдин в Академии
Фантастика:
фэнтези
попаданцы
5.00
рейтинг книги
Этот мир не выдержит меня. Том 2

Второгодка. Книга 4. Подавать холодным

Ромов Дмитрий
4. Второгодка
Фантастика:
героическая фантастика
альтернативная история
сказочная фантастика
5.00
рейтинг книги
Второгодка. Книга 4. Подавать холодным

Жена со скидкой, или Случайный брак

Ардова Алиса
Любовные романы:
любовно-фантастические романы
8.15
рейтинг книги
Жена со скидкой, или Случайный брак

Наследник, скрывающий свой Род

Тарс Элиан
2. Десять Принцев Российской Империи
Фантастика:
попаданцы
альтернативная история
аниме
5.00
рейтинг книги
Наследник, скрывающий свой Род

Кодекс Императора II

Сапфир Олег
2. Кодекс Императора
Фантастика:
аниме
фэнтези
попаданцы
5.00
рейтинг книги
Кодекс Императора II

Личный аптекарь императора. Том 3

Карелин Сергей Витальевич
3. Личный аптекарь императора
Фантастика:
городское фэнтези
попаданцы
аниме
фэнтези
5.00
рейтинг книги
Личный аптекарь императора. Том 3

Вернувшийся: Первые шаги. Том II

Vector
2. Вернувшийся
Фантастика:
боевая фантастика
космическая фантастика
рпг
5.00
рейтинг книги
Вернувшийся: Первые шаги. Том II

Зодчий. Книга V

Погуляй Юрий Александрович
5. Зодчий Империи
Фантастика:
аниме
фэнтези
попаданцы
5.00
рейтинг книги
Зодчий. Книга V

Мечник Вернувшийся 1000 лет спустя. Том 2

Ткачев Андрей Юрьевич
2. Вернувшийся мечник
Фантастика:
аниме
фэнтези
попаданцы
5.00
рейтинг книги
Мечник Вернувшийся 1000 лет спустя. Том 2

Дважды одаренный. Том VI

Тарс Элиан
6. Дважды одаренный
Фантастика:
аниме
альтернативная история
фэнтези
фантастика: прочее
5.00
рейтинг книги
Дважды одаренный. Том VI

Геном хищника. Книга пятая

Гарцевич Евгений Александрович
5. Я - Легенда!
Фантастика:
рпг
фэнтези
попаданцы
6.00
рейтинг книги
Геном хищника. Книга пятая

Развод, который ты запомнишь

Рид Тала
1. Развод
Любовные романы:
остросюжетные любовные романы
короткие любовные романы
5.00
рейтинг книги
Развод, который ты запомнишь