asp操作xml实例
来源：岁月联盟
时间：2012-02-22
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async="false"
xmlDoc.load(Server.MapPath("aspXml2.xml"))
Set roots = xmlDoc.documentElement
Set childs = roots.childNodes
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>asp解析XML文档</title>
</head>
<body>
<table width="80%" style="border-collapse:collapse" border="1" id="myTable">
<tr>
<th>序号</th>
<th>标题</th>
<th>内容</th>
<th>作者</th>
<th>时间</th>
<th>回复</th>
<th>回复内容</th>
<th>地址</th>
</tr>
<%
for i = 0 to childs.length – 1
%>
<tr>
<td><%=childs(i).childNodes(0).text%></td>
<td><%=childs(i).childNodes(1).text%></td>
<td><%=childs(i).childNodes(2).text%></td>
<td><%=childs(i).childNodes(3).text%></td>
<td><%=childs(i).childNodes(4).text%></td>
<td><%=childs(i).childNodes(5).text%></td>
<td><%=childs(i).childNodes(6).text%></td>
<td><%=childs(i).childNodes(7).text%></td>
<!–
这些写法都可以实现遍历，选择最简单的一种
好像asp中不能使用.nodeValue来获取值
<td><%’=childs(i).firstChild.nextSibling.text%></td>
<td><%’=childs(i).firstChild.nextSibling.nextSibling.text%></td>
<td><%’=childs.item(i).childNodes.item(3).text%></td>
<td><%’=childs.item(i).childNodes.item(4).text%></td>
<td><%’=childs.item(i).childNodes.item(5).text%></td>
<td><%’=childs.item(i).childNodes.item(6).text%></td>
<td><%’=childs.item(i).childNodes.item(7).text%></td>–>
</tr>
<%
next
%>
</table>
</body>
</html>
摘自 第零空间
