Данные из xml файла

function wnd_UrlOnPrepare(Window) {
var Storage = new ActiveXObject('TSObjectLibrary.XMLStorage');
var StorageNode = new ActiveXObject('TSObjectLibrary.XMLStorageNode');

// Объект хранения представления дерева узлов в текстовом виде
var Value   = new ActiveXObject('TSObjectLibrary.Value');
Value.Value = new ActiveXObject('TSObjectLibrary.StringsList');

        // Файл для загрузки XML-данных (необходимо наличие корректного XML-файла
        // по указанному адресу)
        var FileName = 'C:\client.xml';

        // Загрузка XML-данных из файла
        Storage.LoadFromFile(FileName);

        // Вывод текста XML
        //var MessageString = Storage.Text;
        //ShowMessage("Загруженный XML-файл:\n " + MessageString);

        // Корневой узел
        StorageNode = Storage.RootNode;

        // Построение дерева для загруженого XML-документа
        BuildTree(-1, StorageNode, Value);

        // Вывод дерева узлов XML
        //MessageString = Value.Value.Text;
        //ShowMessage("Вывод дерева узлов:\n " + MessageString);

    //-----------------------------------------------------------------------------
// Применение методов интерфейса IXMLStorageNode.
//-----------------------------------------------------------------------------

var record = StorageNode.GetChildNode('record');
var fio = StorageNode.GetChildNode('record').GetChildNode('fio');
var company = StorageNode.GetChildNode('record').GetChildNode('company');
var position = StorageNode.GetChildNode('record').GetChildNode('position');
var tel = StorageNode.GetChildNode('record').GetChildNode('tel');
var email = StorageNode.GetChildNode('record').GetChildNode('email');
var country = StorageNode.GetChildNode('record').GetChildNode('country');
var city = StorageNode.GetChildNode('record').GetChildNode('city');
var address = StorageNode.GetChildNode('record').GetChildNode('address');

// В след. строке пытаюсь получить значение fio
var fioValue = StorageNode.GetChildNode('record').GetChildNode('fio').Text;
}

// Функция вывода сообщения
function ShowMessage(Str) {
    for (var i = 1; i arguments.length; i++ ) {
        Str = Str.replace(new RegExp('%' + i), arguments[i]);
    }
   // WScript.Echo(Str);
   ShowInformationDialog(Str);
}

// Функция рекурсивного построение дерева узлов
function BuildTree(Level, Item, Value) {

        // Строка для хранения конечного результата
        var TotalString = new String();

        // Строка выравнивания позиций узлов по ширине нижних уровней
        var WidthString = new String();

        // Переход на уровень вниз
        Level++;

        // Создание текущей глубины обхода для текстового представления,
        //если она не была достигнута
        if (Level >= Value.Value.Count) {
                Value.Value.Add('');
        }
        // Cчитывание строки структуры уровня для добавления узлов
        // того же уровня
        TotalString = Value.Value.Items(Level);

        // Выравнивание узла верхнего уровня по ширине нижних узлов.
        for (var k = Level + 1; k Value.Value.Count; k++) {
                WidthString = Value.Value.Items(k);
                while (TotalString.length WidthString.length) {
                        TotalString += '_';
                }
        }

        // Добавление элемента в текстовое представление
        TotalString = TotalString + '' + Item.Name + '>';
        Value.Value.Items(Level) = TotalString;

        // Рекурсивный вызов построения дерева для всех дочерних узлов
        for (var i = 0; i Item.Count; i++) {
                BuildTree(Level, Item.Items(i), Value);
        }
        // Переход на уровень вверх в дереве после завершения обхода
        // текущего узла
        Level--;

        // Вывод сообщения о завершении обхода дерева
        if (Level 0) {
                ShowMessage("Обход дерева узлов завершен.");
        }
}

 
"Парашута Александр

function wnd_UrlOnShow(Window) {
     Self.Close();
}