Рефераты | Рефераты по информатике, программированию | Использование XML совместно с SQL | страница реферата 29 | Большая Энциклопедия Рефератов от А до Я
Большая Энциклопедия Рефератов от А до Я
  • Рефераты, курсовые, шпаргалки, сочинения, изложения
  • Дипломы, диссертации, решебники, рассказы, тезисы
  • Конспекты, отчеты, доклады, контрольные работы


    • Рефераты | Рефераты по информатике, программированию | Использование XML совместно с SQL


    Рефераты | Рефераты по информатике, программированию | Использование XML совместно с SQL

    Использование XML совместно с SQL




    Категория реферата: Рефераты по информатике, программированию
    Теги реферата: реферат образ жизни, вулканы доклад
    Добавил(а) на сайт: Александрина.



    Предыдущая страница реферата | 24  25  26  27  28  29  30  31  32  33  34 |



    s = "<?xml version='1.0' ?>" & _

     "<my_root xmlns:sql='urn:schemas-microsoft-com:xml-sql'>" & _

      "<sql:query>" & _

       "select au_fname,au_lname,address from authors " & _

        "where au_fname like 'M%' for xml auto" & _

      "</sql:query>" & _

     "</my_root>"

    Set cmd.ActiveConnection = conn

    cmd.CommandType = adCmdText

    cmd.CommandText = s

    ' Диалект шаблона

    cmd.Dialect = "{5D531CB2-E6Ed-11D2-B252-00C04F681B71}"

    cmd.Properties("Output Stream") = Response

    cmd.Execute , , adExecuteStream

    Set cmd = nothing

    Set conn = nothing

    %>

    Выполнение запроса XPath

    С помощью ADO также можно выполнять запросы XPath, правда, пока только на аннотированных XDR-схемах. Вот скрипт на vbs, выполняющий такой запрос:

    ' Определяем константы ADO.

    Const adCmdText = 1

    Const adExecuteStream = &H400

    ' Создание объектов

    Dim cmd,conn,cmdStream

    Dim ie

    Set ie = CreateObject("InternetExplorer.Application")

    ie.Navigate "about:blank"

    Set cmd = CreateObject("ADODB.Command")

    Set conn = CreateObject("ADODB.Connection")

    Set cmdStream = CreateObject("ADODB.Stream")

    conn.Provider = "sqloledb"

    conn.Open "Data Source=server;Initial catalog=pubs;", "user", "password"

    cmdStream.Open

    Set cmd.ActiveConnection = conn

    cmd.CommandType = adCmdText

    ' XPath-запрос

    cmd.CommandText = "Авторы"

    ' Диалект XPath

    cmd.Dialect = "{EC2A4293-E898-11D2-B1B7-00C04F680C56}"

    cmd.Properties("Base Path") = "C:Inetpubwwwrootserver_pubs"

    cmd.Properties("Output Stream") = cmdStream

    ' Аннотированная схема

    cmd.Properties("Mapping Schema") = "schemamyschema.xml"

    ' Шаблон трансформации

    cmd.Properties("XSL") = "templatefirst_select.xsl"

    cmd.Properties("xml root") = "my_root"

    cmd.Execute , , adExecuteStream

    Dim str

    str = cmdStream.ReadText

    do


    Рекомендуем скачать другие рефераты по теме: права человека реферат, реферат влияние.



    Предыдущая страница реферата | 24  25  26  27  28  29  30  31  32  33  34 |




    Поделитесь этой записью или добавьте в закладки

       

    Категории:



    Разделы сайта




    •