top
Loading...
SQLServer2000中生成XML的小技巧

以前在介紹SQL2k的時候已經提到了SQL2k對XML的支持,使用for XML語句就可以很容易的把執行的結果轉化為一個XML,這樣可以在很大程度上提高系統運行效率和開發速度,詳細的內容請參見Books Online。

但是在使用ADO(Required ADO 2.6)訪問返回的XML的方式和原來的Recordset是有所不同的。如果你還是使用Recordset訪問的話,只能得到一個Unicode格式的XML Schema,而無法得到XML的內容。

其實這個問題也是很容易就能解決的,只是我自以為很熟悉ADO,沒有仔細看Help,所以沒有發現ADO是采用Stream的方式來得到和返回XML的。

Command 對象有兩個屬性,叫Input Stream和Output Stream,屬性的值是一個IUnknown接口。可以把一個XML Parser的接口賦給它,或者是直接用Request、Response等。這樣的好處是不需要再去生成一個Recordset,不需要去保存這些數據,從而節省了系統開銷。

下面給大家一個簡單的把XML用Response返回的Example:

<%@ Language=VBScript %> <!-- #include file="ADOVBS.inc" --> <% Dim objConn, objCmd, i Set objConn = Server.createobject("ADODB.CONNECTION") objConn.Open "Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=PBA;Data Source=(local)" Set objCmd = Server.CreateObject("ADODB.Command") objCmd.ActiveConnection = objConn objCmd.Properties("Output Stream") = Response objCmd.Properties("XML Root") = "root" objCmd.CommandText = "Select * from UserStatus for XML Auto" Response.ContentType = "text/xml" objCmd.Execute i, , adExecuteStream Set objCmd = Nothing objConn.Close Set objConn = Nothing %>
作者:http://www.zhujiangroad.com
來源:http://www.zhujiangroad.com
北斗有巢氏 有巢氏北斗