XDRは知らないのですか?これは単純化された XML データです。次に、このようなクエリを実装する方法を示します
SELECT o.OrderID, o.OrderDate from Orders o, Customers c,
WHERE o.CustomerID = c.CustomerID and c.CompanyName = ?
Code:
<%@ Language=VBScript %>
<%
Dim sConn
sConn = "プロバイダ=SQLOLEDB; データ ソース=(ローカル); 初期カタログ=ノースウィンド; ユーザー ID=SA;パスワード=;"
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("マッピング スキーマ") = "注文。 xml"
adoCmd.Properties("ベース パス") = "C:INETPUBWWWROOTPBA"
adoCmd.Properties("出力ストリーム") = Response
Response.write "
adoCmd. Execute , , 1024 'adExecuteStream
Response.write "
%>
Result:
<注文顧客ID="TORTU" 注文ID="10276" 注文日="1996-08-08T00:00:00" />
<注文顧客ID="TORTU" 注文ID="10293" 注文日=1996 -08-29T00:00:00" />
<注文 CustomerID="TORTU" OrderID="10304" OrderDate="1996-09-12T00:00:00" />
<注文 CustomerID="TORTU " OrderID="10319" OrderDate="1996-10-02T00:00:00" />