加入收藏 | 设为首页 | 会员中心 | 我要投稿 聊城站长网 (https://www.0635zz.com/)- 智能语音交互、行业智能、AI应用、云计算、5G!
当前位置: 首页 > 教程 > 正文

asp读取xml实例代码分享

发布时间:2023-06-07 13:29:18 所属栏目:教程 来源:
导读:读取xml文件的实例代码。

language.xml

复制代码代码如下:

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

<languageRoot>

<!--简体中文-->

<language>

<LanguageName>简体中文</LanguageNam
读取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
 
%>
 
 

(编辑:聊城站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!