在SQL2000查询中使用XDR的例子 -pc6资讯

您的位置：首页 → 技术开发 → 数据库技巧 → 在SQL2000查询中使用XDR的例子

在SQL2000查询中使用XDR的例子 时间：2004/11/15 23:32:00来源：本站整理作者：蓝点我要评论(0): XDR不会不知道吧？就是简化的XML-Data啦。现在示范一个如何实现这样的查询

SELECT o.OrderID, o.OrderDate from Orders o, Customers c,

WHERE o.CustomerID = c.CustomerID and c.CompanyName = ?

Code:

<%@ Language=VBScript %>

<%

    Dim sConn

    sConn = "Provider=SQLOLEDB; Data Source=(local); Initial Catalog=Northwind; User ID=SA;Password=;"



    Dim adoConn

    Set adoConn = Server.CreateObject("ADODB.Connection")

    adoConn.ConnectionString = sConn

    adoConn.CursorLocation = 3 'adUseClient

    adoConn.Open



    Dim adoCmd

    Set adoCmd = CreateObject("ADODB.Command")

    Set adoCmd.ActiveConnection = adoConn

    adoCmd.CommandText = "Customer[@CompanyName=""Tortuga Restaurante""]"

    adoCmd.Dialect = "{ec2a4293-e898-11d2-b1b7-00c04f680c56}"



    adoCmd.Properties("Mapping Schema") = "Orders.xml"

    adoCmd.Properties("Base Path") = "C:\INETPUB\WWWROOT\PBA\"

    adoCmd.Properties("Output Stream") = Response



    Response.write ""

    adoCmd.Execute , , 1024 'adExecuteStream

    Response.write ""

%>

Result:























Orders.xml

xmlns:sql="urn:schemas-microsoft-com:xml-sql">































relation="Orders" />

文章评论

查看所有0条评论>>

热门文章 没有查询到任何记录。