经典ASP读取XML文件节点示范

1. 
   
2. '遍历XML文件示范
   
3. Dim objXMLDoc
   
4. Dim xmlProduct   
   
5. Dim productCode
   
6. Dim productName
   
7. 
   
8. Set objXMLDoc = Server.CreateObject("Msxml2.DOMDocument.6.0")   
   
9.                 objXMLDoc.async = False   
   
10.                 objXMLDoc.load Server.MapPath("xml/9-2022081214480742535.xml")               
    
11.                        
    
12.                 For Each xmlProduct In objXMLDoc.documentElement.selectNodes("//Records/Record")
    
13.                  productCode = xmlProduct.selectSingleNode("序号").text   
    
14.                  productName = xmlProduct.selectSingleNode("用途").text   
    
15.                  Response.Write Server.HTMLEncode(productCode) & "-------------"
    
16.                  Response.Write Server.HTMLEncode(productName) & "<br>"   
    
17.                 Next   
    
18. 
    
19. Set objXMLDoc =Nothing
    
20. 
    
21. '单个节点读取
    
22. response.Write objXMLDoc.selectSingleNode("//Records//RecordTY/中文").text
    

复制代码