ASP & XML - что-то вроде конфигурационных файлов для сай

Программирование на Active Server Pages и VBScript.
Cyrax
Cyberninja
Cyberninja
Аватара пользователя
 
Сообщения: 891
Зарегистрирован: 25.04.2002 (Чт) 21:20
Откуда: Magnitogorsk, Russia

ASP & XML - что-то вроде конфигурационных файлов для сай

Сообщение Cyrax » 16.01.2004 (Пт) 18:51

эксперементирую с написанием системы управления контентом на ASP. с обработкой шаблонов страниц вроде разобрался... но есть один момент - нужно хранить некоторую часть информации о сайте постоянно. причем доступ к ней должен быть быстрым и простым. есть желание оганизовать это при помощи XML. как прочитать XML-файл с диска и сохранить его в переменной уровня ASP-приложения знаю, а вот получить данные, хранящиеся в этой переменной не очень получается... по этой причине обращаюсь ко всем, кто имел дело с подобными задачами: помогите разобраться
приветствуется любая помощь: от советов и примеров до ссылок на ресурсы сети.
на данный момент у меня получилось следующее:

конфигурационный XML-файл:
Код: Выделить всё
<?xml version="1.0" encoding="windows-1251" ?>
<global>
  <appinfo>
    <ProductName>ASP-Discovery</ProductName>
    <Version>1.0.0a</Version>
    <CompanyName>Cyrax</CompanyName>
    <LegalCopyright>© 2003 Cyrax</LegalCopyright>
  </appinfo>
  <variables>
    <SiteTitle>-=[ Cyrax's Home ]=-</SiteTitle>
    <DefaulThemePath>themes/redblocked/</DefaulThemePath>
    <CurrentThemePath>themes/redblocked/</CurrentThemePath>
  </variables>
</global>

процедура Application_OnStart:
Код: Выделить всё
sub Application_OnStart()
  set doc = Server.CreateObject("MSXML2.FreeThreadedDOMDocument")
  with doc
    .async = false
    .setProperty "SelectionLanguage", "XPath"
    .load Server.MapPath("/global.xml")
    Application("AppGlobal") = .xml
  end with
  set doc = nothing
end sub

а вот с кодом чтения данных затык...
Ты это ему расскажи. Я уже пять болтов отвинтил, и конца не видно... (озадаченно) А это в какую сторону тянуть? Ну-ка... Ага, этот был лишний, этот вообще не отсюда, и этот... Точно, два болта.

Welcome to IRC

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Сообщение skiperski » 16.01.2004 (Пт) 19:06

Код: Выделить всё
Set doc = Server.CreateObject("MSXML2.FreeThreadedDOMDocument")
With doc
    .async = false
    .setProperty "SelectionLanguage", "XPath" '??? это зачем???
    .loadXML Application("AppGlobal")
   
    LegalCopyright = .selectSingleNode("global/appinfo/LegalCopyright").Text
   
    'или
   
    Set RootNode = .selectSingleNode("global")
    With RootNode
        ProductName = .selectSingleNode("appinfo/ProductName").Text
        SiteTitle = .selectSingleNode("variables/SiteTitle").Text
    End With
   
End With
Set doc = Nothing

Cyrax
Cyberninja
Cyberninja
Аватара пользователя
 
Сообщения: 891
Зарегистрирован: 25.04.2002 (Чт) 21:20
Откуда: Magnitogorsk, Russia

Сообщение Cyrax » 18.01.2004 (Вс) 10:16

skiperski писал(а):.setProperty "SelectionLanguage", "XPath" '??? это зачем???
сам не знаю - это было выдрано из одного примера... взятого с сайта http://prosto.pp.ru/. может это и лишне...
а почитать что-нибудь? кроме MSDN, конечно
Ты это ему расскажи. Я уже пять болтов отвинтил, и конца не видно... (озадаченно) А это в какую сторону тянуть? Ну-ка... Ага, этот был лишний, этот вообще не отсюда, и этот... Точно, два болта.

Welcome to IRC

dezruptor
Начинающий
Начинающий
 
Сообщения: 12
Зарегистрирован: 05.07.2004 (Пн) 12:01

Сообщение dezruptor » 05.07.2004 (Пн) 12:27

А объект "MSXML2.FreeThreadedDOMDocument" изначально на сервере IIS5 всегда есть, либо он с чем то ставится?


Вернуться в ASP и VBScript

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7

    TopList