Андрей Попов - 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.
