Read fixed XML files:
<? XML version = "1.0" encoding = "UTF-8"?>
<XML>
<Ao>
<String> A </string>
<String> B </string>
<String> C </string>
<String> d </string>
<String> E </string>
</Ao>
</XML>
<%
Set myxml = server. Createobject ("Microsoft. xmldom ")
Myxml. Load (server. mappath ("test. xml "))
Set myroot=myxml.doc umentelement. selectsinglenode ("Ao ")
Dim lenth: lenth = myroot. childnodes. Length 'node count
For I = 0 to lenth-1
Response. Write (myroot. childnodes. Item (I). Text)
Next
Set myroot = nothing
Set myxml = nothing
%>
Read the XML returned by the URL
<%
myxml = "http://api.y.joy.cn/list? Type = 2 & SID = 1886715 & COUNT = 100 & page = 1 & format = xml & Key = 83af09d2993048abb6f1de1efe73205a & uid = 1555851259 "
set xml = server. createobject ("Microsoft. xmldom ")
XML. async = "false"
XML. resolveexternals = "false"
XML. setproperty "serverhttprequest", true
XML. load (myxml)
set objnodes = xml. getelementsbytagname ("video")
for I = 0 to objnodes. length-1
response. write "
" & trim (objnodes (I ). selectsinglenode ("ftitle "). text) & " "
next
%>