asp读取xml实例代码

187 阅读 0 评论 124 点赞

我是靠谱客的博主干净音响，最近开发中收集的这篇文章主要介绍asp读取xml实例代码，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

language.xml

复制代码代码如下:

 
<?xml version="1.0" encoding="gb2312"?> 
<languageRoot> 

<!--简体中文--> 
<language> 
<LanguageName>简体中文</LanguageName> 
<LanguageValue>SimpilifiedChinese</LanguageValue> 
<LanguageImages>images</LanguageImages> 
<LanguageFile></LanguageFile> 
</language> 

<!--繁體中文--> 
<language1> 
<LanguageName>繁體中文</LanguageName> 
<LanguageValue>TraditionalChinese</LanguageValue> 
<LanguageImages>imagesBig5</LanguageImages> 
<LanguageFile>ddd</LanguageFile> 
</language1> 
</languageRoot> 

sl.asp

复制代码代码如下:

 
<% 
Set objXML2 = Server.CreateObject("Msxml2.DOMDocument") 
objXML2.async = False 
loadResult = objXML2.load(Server.MapPath("language.xml")) 

if not loadResult then 
Response.write "装载XML文件错误" 
Response.end 
end If 
Set objNodes = objXML2.getElementsByTagName("languageRoot/language") 
For i = 0 to objNodes.length - 1 
Response.write Trim(objNodes(i).selectSingleNode("LanguageName").Text)&"<br>" 
Response.write Trim(objNodes(i).selectSingleNode("LanguageValue").Text)&"<br>" 
Response.write Trim(objNodes(i).selectSingleNode("LanguageImages").Text)&"<br>" 
Next 
set objNodes = Nothing 
Set objNodes = objXML2.getElementsByTagName("languageRoot/language1") 
For i = 0 to objNodes.length - 1 
Response.write Trim(objNodes(i).selectSingleNode("LanguageName").Text)&"<br>" 
Response.write Trim(objNodes(i).selectSingleNode("LanguageValue").Text)&"<br>" 
Response.write Trim(objNodes(i).selectSingleNode("LanguageImages").Text)&"<br>" 
Response.write Trim(objNodes(i).selectSingleNode("LanguageFile").Text)&"<br>" 
Next 
set objNodes = Nothing 
Set objXML = Nothing 
%> 