如何用写一段ASP程序,把一个XML文件的内容读出来?不是ASP.Net哦!
同上 问题点数:100、回复次数:6Top
1 楼jnkc(江南昆虫)回复于 2003-12-04 00:53:45 得分 10
如果是要读取全部,用FSO当作文本文件对待就行了;
如果需要其中的部分内容,用“Server.CreateObject("Microsoft.XMLDOM")”进行操作。Top
2 楼happymingnan(湖畔的畅想)回复于 2003-12-04 00:57:05 得分 0
学习Top
3 楼mudonfield(如影随行·郁闷得太久了)回复于 2003-12-04 09:27:50 得分 0
jnkc(江南昆虫)可否明示?
如何把一个很规则表格的XML里的每一行的每一格读出来。Top
4 楼online(龙卷风V4.0--决战江湖(MS MVP-VB))回复于 2003-12-04 13:32:46 得分 10
看看
http://expert.csdn.net/Expert/topic/2522/2522785.xml?temp=.4890558
虽然是vb的,但是比较容易改成asp的Top
5 楼possible_Y(████本人签名需要刮开,方可看到 )回复于 2003-12-04 13:46:28 得分 40
用fso:
<%
Set fso=Server.CreateObject("Scripting.FileSystemObject")
Set fil=fso.OpenTextFile(Server.MapPath("your.xml"),1)
na=fil.ReadAll
fil.close
%>
<textarea><%=na%></textarea>
用xmldom:
set s_xmldoc=server.CreateObject("MSXML2.DOMDocument")
s_xmldoc.async=false
s_xmldoc.load(Server.MapPath("your.xml"))
……Top
6 楼possible_Y(████本人签名需要刮开,方可看到 )回复于 2003-12-04 13:59:36 得分 40
<%
function parser(node){
Set nodes=node.childNodes
if node.nodeType=1 then
strHTML=strHTML&"<ul><li><b>节点:</b>" & node.nodeName & ";"
end if
if node.hasChildNodes then
for Each Item In nodes
nodeT=Item
if nodeT.nodeType=3 then
strHTML=strHTML&"<b>值</b>" & node.text
end if
call parser(nodeT)
next
end if
if node.nodeType=1 then
strHTML+="</ul>";
end if
end function
set s_xmldoc=server.CreateObject("MSXML2.DOMDocument")
s_xmldoc.async=false
s_xmldoc.load(Server.MapPath("your.xml"))
call parser(s_xmldoc.documentElement)
%>Top




