十年網(wǎng)站開發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營維護(hù)+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
SQL Server 2000是一款功能性較好的數(shù)據(jù)庫,使用for XML語句就可以很容易的把執(zhí)行的結(jié)果轉(zhuǎn)化為一個(gè)XML,這樣可以在很大程度上提高系統(tǒng)運(yùn)行效率和開發(fā)速度,那么在SQL Server 2000中如何生成XML呢?

但是在使用ADO(Required ADO 2.6)訪問返回的XML的方式和原來的Recordset是有所不同的。如果你還是使用Recordset訪問的話,只能得到一個(gè)Unicode格式的XML Schema,而無法得到XML的內(nèi)容。
其實(shí)這個(gè)問題也是很容易就能解決的,只是我自以為很熟悉ADO,沒有仔細(xì)看Help,所以沒有發(fā)現(xiàn)ADO是采用Stream的方式來得到和返回XML的。
Command 對象有兩個(gè)屬性,叫Input Stream和Output Stream,屬性的值是一個(gè)IUnknown接口??梢园岩粋€(gè)XML Parser的接口賦給它,或者是直接用Request、Response等。這樣的好處是不需要再去生成一個(gè)Recordset,不需要去保存這些數(shù)據(jù),從而節(jié)省了系統(tǒng)開銷。
下面給大家一個(gè)簡單的把XML用Response返回的Example:
以下為引用的內(nèi)容:
<%@ 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
%>
XML帶來了很多的操作上的方便,使用起來可以很大程度的方便大家的工作,上文介紹的SQL Server 2000中生成XML的技巧希望對大家能夠有所幫助。