访谈录:阿里妈妈

使用XML存储的数据给我们带来了极大的方便，而且，XML是跟平台无关的。利用XSLT可以将XML转换成任意格式的文档，比如HTML。另外还可以使用这种方法来实现跨平台浏览器（IE,火狐，WAP浏览器等）的支持。比如用如下ASP代码获取客户端浏览器类型：

<%

Dim objBrowsCap

Set objBrowsCap = Server.CreateObject("MSWC.BrowserType")

%>

浏览器(Browser):<%=objBrowsCap.browser%>

浏览器版本(Version):<%=objBrowsCap.version%>

然后通过判断浏览器的类型来使用不同的XSLT对你的XML数据进行转换。

下面是转换XML的方法：

<%

function Transform(xmlPath,xsltPath) Dim result, xsltDocument,xmlDocument Set xmlDocument=CreateObject("MSXML2.DOMDocument") xmlDocument.load(Server.MapPath(xmlPath)) Set xsltDocument = CreateObject("MSXML2.DOMDocument") xsltDocument.load(Server.MapPath(xsltPath)) result = xmlDocument.transformNode(xsltDocument) Set objXMLDOM = Nothing Set objXMLDOM_XSLT = Nothing Transform=result end function

%>

参数xmlPath指定将被转换的XML的文件名。

参数xsltPath指定xls的文件名。

下面是将XML转换成HTML的一个实例：

1、 XML存储的数据文件(table.xml):

<?xml version="1.0" encoding="utf-8" ?>

<Items>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

<Item>

<Url>http://blog.163.com/lxd_201/</Url>

<Title>☆聊ゾ聊☆</Title>

</Item>

</Items>

2、 XSLT文件（table.xsl）：

<?xml version="1.0" encoding="UTF-8"?>

<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"

xmlns:copyRight="http://xml.sz.luohuedu.net/">

<xsl:template match="/">

<!-- 定义常量 -->

<xsl:variable name="strTrLeft" select="'&lt;tr&gt;'"/>

<xsl:variable name="strTrRight" select="'&lt;/tr&gt;'"/>

<!-- 计算总记录数 -->

<xsl:variable name="nTotal" select="count(/Items/Item)"/>

<!-- 定义列数 -->