• 软件测试技术
  • 软件测试博客
  • 软件测试视频
  • 开源软件测试技术
  • 软件测试论坛
  • 软件测试沙龙
  • 软件测试资料下载
  • 软件测试杂志
  • 软件测试人才招聘
    暂时没有公告

字号: | 推荐给好友 上一篇 | 下一篇

在SQL 2000查询中使用XDR的一些例子

发布: 2007-6-21 12:06 | 作者:   | 来源:   | 查看: 17次 | 进入软件测试论坛讨论

领测软件测试网

   
  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 "<XML ID='MyDataIsle'>"
  
    adoCmd.Execute , , 1024 'adExecuteStream
  
    Response.write "</XML>"
  
  %>
  
  Result:
  
  <XML ID="MyDataIsle">
  
  <Customer CustomerID="TORTU" CompanyName="Tortuga Restaurante">
  
   <Order CustomerID="TORTU" OrderID="10276" OrderDate="1996-08-08T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10293" OrderDate="1996-08-29T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10304" OrderDate="1996-09-12T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10319" OrderDate="1996-10-02T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10518" OrderDate="1997-04-25T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10576" OrderDate="1997-06-23T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10676" OrderDate="1997-09-22T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10842" OrderDate="1998-01-20T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="10915" OrderDate="1998-02-27T00:00:00" />
  
   <Order CustomerID="TORTU" OrderID="11069" OrderDate="1998-05-04T00:00:00" />
  
  </Customer>
  
  </XML> 
  
  Orders.xml
  
  <?xml version="1.0" ?>
  
  <Schema xmlns="urn:schemas-microsoft-com:xml-data" xmlns:dt="urn:schemas-microsoft-com:datatypes"
  
  xmlns:sql="urn:schemas-microsoft-com:xml-sql">
  
   <ElementType name="Order" sql:relation="Orders">
  
    <AttributeType name="CustomerID" />
  
    <AttributeType name="OrderID" />
  
    <AttributeType name="OrderDate" />
  
    <attribute type="CustomerID" sql:field="CustomerID" />
  
    <attribute type="OrderID" sql:field="OrderID" />
  
    <attribute type="OrderDate" sql:field="OrderDate" />
  
   </ElementType>
  
   <ElementType name="Customer" sql:relation="Customers">
  
    <AttributeType name="CustomerID" />
  
    <AttributeType name="CompanyName" />
  
    <attribute type="CustomerID" sql:field="CustomerID" />
  
    <attribute type="CompanyName" sql:field="CompanyName" />
  
    <element type="Order">
  
     <sql:relationship key-relation="Customers" key="CustomerID" foreign-key="CustomerID" foreign-
  
  relation="Orders" />
  
    </element>
  
   </ElementType>
  
  </Schema>

文章来源于领测软件测试网 https://www.ltesting.net/


关于领测软件测试网 | 领测软件测试网合作伙伴 | 广告服务 | 投稿指南 | 联系我们 | 网站地图 | 友情链接
版权所有(C) 2003-2010 TestAge(领测软件测试网)|领测国际科技(北京)有限公司|软件测试工程师培训网 All Rights Reserved
北京市海淀区中关村南大街9号北京理工科技大厦1402室 京ICP备10010545号-5
技术支持和业务联系:info@testage.com.cn 电话:010-51297073

软件测试 | 领测国际ISTQBISTQB官网TMMiTMMi认证国际软件测试工程师认证领测软件测试网