Windows Script Host для Windows 2000/XP - Андрей Попов

 //окна со строкой ввода

 PersonRec.LastName=WSHInputBox("Введите фамилию","Добавление записи");

 PersonRec.Name=WSHInputBox("Введите имя","Добавление записи");

 PersonRec.Phone=WSHInputBox("Введите телефон","Добавление записи");

 PersonRec.Street=WSHInputBox("Введите улицу","Добавление записи");

 PersonRec.House=WSHInputBox("Введите дом","Добавление записи");

 PersonRec.App=WSHInputBox("Введите квартиру","Добавление записи");

 PersonRec.Note=WSHInputBox("Введите примечание","Добавление записи");

}

//Сохранение данных из объекта PersonRec в XML-файле

function RecordToFile(PersRec) {

В var Root,NewElem,s;

 //Создаем объект DOMDocument

В XMLDoc = WScript.CreateObject("Msxml.DOMDocument");

 //Загружаем XML-файл

В XMLDoc.load(PathBook);

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

 //документа

В Root=XMLDoc.documentElement;

 //Создаем XML-элемент Person

В NewElem=XMLDoc.createElement("Person");

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

В Root.appendChild(NewElem);

 //Сохраняем в переменной Root ссылку на последний добавленный

 //элемент Person

В Root=Root.lastChild;

 //Создаем элемент LastName

В NewElem=XMLDoc.createElement("LastName");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента LastName

 //значение поля LastName объекта PersRec

В Root.lastChild.text=PersRec.LastName;

 //Создаем элемент Name

В NewElem=XMLDoc.createElement("Name");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента Name

 //значение поля Name объекта PersRec

В Root.lastChild.text=PersRec.Name;

 //Создаем элемент Phone

В NewElem=XMLDoc.createElement("Phone");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента Phone

 //значение поля Phone объекта PersRec

В Root.lastChild.text=PersRec.Phone;

 //Создаем элемент Street

В NewElem=XMLDoc.createElement("Street");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента Street

 //значение поля Street объекта PersRec

В Root.lastChild.text=PersRec.Street;

 //Создаем элемент House

В NewElem=XMLDoc.createElement("House");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента House

 //значение поля House объекта PersRec

В Root.lastChild.text=PersRec.House;

 //Создаем элемент App

В NewElem=XMLDoc.createElement("App");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента App

 //значение поля House объекта PersRec

В Root.lastChild.text=PersRec.App;

 //Создаем элемент Note

В NewElem=XMLDoc.createElement("Note");

 //Добавляем новый элемент в XML-файл (внутри элемента Person)

В Root.appendChild(NewElem);

 //Подставляем в качестве содержимого элемента App

 //значение поля House объекта PersRec

В Root.lastChild.text=PersRec.Note;

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

В XMLDoc.save(PathBook);

}

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

function AddRecord() {

 //Заполняем поля объекта PersonRec

В MakePersonRec();

 //Сохраняем данные из объекта PersonRec в XML-файл

В RecordToFile(PersonRec);

}

//Построение путей к файлам

function InitPath() {

В BasePath=WshShell.CurrentDirectory+"\";

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

В PathBook=BasePath+"book.xml";

}

//Основная запускная функция

function Main() {

В var Res;

 //Создаем объект WshShell

В WshShell = WScript.CreateObject("WScript.Shell");

 //Определяем пути к файлам

В InitPath();

 //Запрос на создание нового ключа

 Res=WshShell.Popup("Добавить запись в n"+PathBook+"?",0,

  "Записная книжка",vbQuestion+vbYesNo);

 if (Res==vbYes) { //Нажата кнопка Да

  //Добавляем новую запись в книжку

В  AddRecord();

  //Выводим информацию на экран

  WshShell.Popup("Новая записьnn"+PersonRec.LastName+" "+

В В  PersonRec.Name+"n"+PersonRec.Phone+"n"+

В В  PersonRec.Street+", "+PersonRec.House+"-"+PersonRec.App+"nn"+

   "добавлена!",0, "Записная книжка",vbInformation+vbOkOnly);

В }

}

//Запускаем основную функцию

Main();

</script>

</job>

</package>

Ртак, Сѓ нас теперь имеется многозадачный WS-файл PhoneBook.wsf, обеспечивающий необходимую функциональность для работы СЃ записной книжкой, Рё следующая задача состоит РІ организации более или менее СѓРґРѕР±РЅРѕРіРѕ диалога СЃ пользователем для запуска заданий РёР· этого файла.

Обработка параметров командной строки

Самый простой вариант организовать диалог с пользователем состоит в использовании параметров командной строки. Напомним, что объектная модель WSH предоставляет несколько методов, которые позволяют производить анализ именных и безымянных параметров (см. разд. "Работа с параметрами командной строки сценария" главы 2), с которыми был запущен сценарий, а в схеме WS XML есть несколько специальных элементов (<runtime>, <named>, <unnamed>, <description> и <example>), предназначенных для быстрого создания встроенной справки, описывающей синтаксис сценария и смысл каждого из параметров.

Для нашего примера мы создадим сценарий ArgMenu.wsf, в котором будем анализировать аргументы командной строки и в зависимости от них запускать то или иное задание из файла PhoneBook.wsf. Названия и назначения именных параметров, которые мы будем использовать, приведены в табл. 7.1.