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

Windows Script Host для Windows 2000/XP

на обложку

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

Шрифт:

this.CurRecord--;

}

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

function ListPersons_FirstRecord {

this.CurRecord = 0;

}

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

function ListPersons_FinalRecord {

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

}

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

function ListPersons_NewRecord {

var Root,NewElem;

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

//документа

Root=XML.documentElement;

//Создаем новый элемент Person

NewElem=XML.createElement("Person");

//Добавляем новый элемент в XML-файл

Root.appendChild(NewElem);

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

XML.save(PathBook);

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

this.RefreshDialog(false);

}

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

function ListPersons_DelRecord {

var Root,DelNom;

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

//документа

Root=XML.documentElement;

//В переменной DelNom сохраняем номер удаляемого элемента Person

DelNom=this.CurRecord+1;

//Удаляем DelNom-й элемент Person из XML-файла

Root.removeChild(Root.childNodes.item(DelNom))

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

XML.save(PathBook);

//Выводим сообщение о том, что запись удалена

WshShell.Popup("Запись N "+DelNom+" удалена",0,"Информация",

vbInformation+vbOkOnly);

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

this.RefreshDialog(true);

}

Вывод формы из сценария WSH

Для того чтобы вывести из сценария WSH разработанную HTML-форму на экран, нужно вначале получить ссылку на объект

Application

, который определяется в объектной модели Internet Explorer. Делается это следующим образом:

var ie = WScript.CreateObject("InternetExplorer.Application", "ie_");

При этом в память загружается новый экземпляр Internet Explorer, а ссылка на этот объект присваивается переменной

(само окно браузера по умолчанию невидимо, для его отображения на экране необходимо установить свойство

Visible

объекта

Application

в 1). В качестве второго параметра метода

CreateObject

указан префикс "

_", посредством которого мы сможем написать функции-обработчики событий Internet Explorer.

Внешний вид браузера Internet Explorer настраивается с помощью нескольких свойств объекта

Application

//Устанавливаем свойства объекта ie для отображения формы

ie.AddressBar = false; //Адресная строка не выводится

ie.Fullscreen = false; //Полноэкранный режим запрещен

ie.MenuBar = false; //Главное меню браузера не выводится

ie.Resizable = false; //Изменять размеры окна нельзя

ie.StatusBar = false; //Строка статуса не выводится

ie.ToolBar = false; //Инструментальная панель не выводится

//Устанавливаем размеры окна

ie.Height = 300; //Высота

ie.Width = 780; //Длина

Для того чтобы загрузить в браузер нужный нам файл Phone.htm с описанием формы, используется метод Navigate объекта Application:

ie.Navigate(PathHTML);

В качестве параметра метода

Navigate

указывается путь к файлу Phone.htm, который заранее устанавливается в функции

InitPath

function InitPath {

BasePath=WshShell.CurrentDirectory+"\\";

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

PathBook=BasePath+"book.xml";

//Путь к файлу с HTML-формой

PathHTML=BasePath+"Phone.htm";

}

Далее следует учесть, что сценарий WSH и окно браузера, в котором загружена форма, — это два независимых процесса. Поэтому в сценарии после загрузки формы в окно браузера необходимо дождаться, пока пользователь не закроет это окно. Для этого мы присвоим глобальной переменной

IsQuit

значение

false

и заставим сценарий выполняться до тех пор, пока значение этой переменной не станет равным

true

while (!IsQuit)

//Приостанавливаем сценарий на 0,1 сек

WScript.Sleep(100);

При закрытии формы будет генерироваться событие

OnQuit

объекта

Application