** 概述 : ** 本文档介绍了如何借助 XML 语言实现在 Web 页面上的 OWC 对数据库中的数据进行展示的方法。由于 XML 数据可以跨越防火墙，因此该方式可以实现在 Internet 上对数据进行展现 。
在基于 WEB 的数据库分析应用中，常常借助 OWC 控件结合 HTML 实现对数据的表格和图表两种方式的展现。一般应用往往采用 OWC 直接连接数据库的方式，这会使数据库连接口令暴露在客户端，而使数据库的安全性降低。本文介绍的采用 XML 作为 OWC 和数据库之间数据交换介质的方式，能够避免这种对数据库造成的不安全危险。同时，这也能带来其他一些好处，例如：使浏览器与 WEB 服务器及数据库间的交互次数减少，从而加快排序等操作的响应速度，并减少了服务器的负荷。
一、获取 XML 数据
将数据库中的数据转化为 XML 格式的方法很多，本文档不过多对此进行介绍。从性能、通用性角度考虑，这里我们采用了 ADO 直接序列化 ( 持久化 Persist) 数据的方式，代码如下：
1
2
3dim strConn
4
5strConn="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=test;Data Source=jlwz"
6
7'---------- 读取数据 \----------------
8
9dim conn,rs
10
11set conn=server.CreateObject("adodb.connection")
12
13set rs=server.CreateObject("adodb.recordset")
14
15conn.Open strConn
16
17rs.Open "Select Stat_Date,Call_Num,Call_Fee From CallStat",conn
18
19' 将 ADO 转化为 xml dom
20
21Const adPersistXML=1
22
23dim objXMLDom
24
25set objXMLDom=server.CreateObject("MSXML2.DOMDocument.3.0")
26
27rs.Save objXMLDom,adPersistXML
28
29set rs=nothing
这种方式得到的的 XML 并不够简洁，其中包含了 Schema 信息。
尽管对于 OWC 中的 DataSourceControl 控件来说，可以直接采用这种形式的 XML 数据，但考虑到数据从服务器向客户端传输的效率，我们使用 XSLT 对这种 XML 数据进行了转化。为此，编写了如下的 Clean.xsl 文件：
1<xsl:stylesheet version="1.0" xmlns:dt="uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" xmlns:rs="urn:schemas-microsoft-com:rowset" xmlns:s="uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:z="#RowsetSchema">
2<xsl:output omit-xml-declaration="yes"></xsl:output>
3<xsl:template match="/">
4<xsl:element name="data">
5<xsl:for-each select="/xml/rs:data/z:row">
6<xsl:element name="row">
7<xsl:for-each select="@*">
8<xsl:element name="{name()}">
9<xsl:value-of select="."></xsl:value-of>
10</xsl:element>
11</xsl:for-each>
12</xsl:element>
13</xsl:for-each>
14</xsl:element>
15</xsl:template>
16</xsl:stylesheet>
然后，在 GetData.asp 中通过如下代码对前面的 XML 数据进行转化：
' 用 XSLT 清理转化 XML 数据
Dim strCleanXML,objXSLT
set objXSLT=server.CreateObject("MSXML2.DOMDocument")
objXSLT.load(server.MapPath("Clean.xsl"))
strCleanXML=objXMLDom.transformNode(objXSLT)
此时，就得到了我们想要的比较简洁的 XML 结构的字符串，可以简单地将其 Response.Write 到客户端：
1<data>
2<row>
3<stat_date>2003-06-01</stat_date>
4<call_num>100</call_num>
5<call_fee>200</call_fee>
6</row>
7<row>
8<stat_date>2003-07-01</stat_date>
9<call_num>200</call_num>
10<call_fee>400</call_fee>
11</row>
12
13。。。
14
15</data>