江西广告网

标题: 怎样用SQL 2000 生成XML [打印本页]

作者: 中国龙    时间: 2009-2-19 08:26
标题: 怎样用SQL 2000 生成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.1assword=ersist 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://bbs.jxadw.com/) Powered by Discuz! X3.2