Heim >Datenbank >MySQL-Tutorial >在SQL2000查询中使用XDR的例子_MySQL

在SQL2000查询中使用XDR的例子_MySQL

WBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWB
WBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOriginal
2016-06-01 14:06:001277Durchsuche

XDR不会不知道吧?就是简化的XML-Data啦。现在示范一个如何实现这样的查询

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

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

Code:




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" />







Stellungnahme:
Der Inhalt dieses Artikels wird freiwillig von Internetnutzern beigesteuert und das Urheberrecht liegt beim ursprünglichen Autor. Diese Website übernimmt keine entsprechende rechtliche Verantwortung. Wenn Sie Inhalte finden, bei denen der Verdacht eines Plagiats oder einer Rechtsverletzung besteht, wenden Sie sich bitte an admin@php.cn