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 %>