以前在先容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 %>
<%
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
%>