Additional Services

<% set xmlHTTP = server.createobject("MSXML2.XMLHTTP") xmlHTTP.open "Get", "http://www.powershiftlive.com/all_features.xml.php?network_id=56&station_id=159", false xmlHTTP.send() Set ObjXML = xmlHTTP.ResponseXml Set XMLroot = objXML.documentElement For i = 0 To (XMLroot.childNodes.length - 1) Set video = XMLroot.childNodes(i) videoId = video.getAttribute("id") videoPath = "" videoDescription = "" videoThumbnail = "" Set videoData = video.childNodes For a = 0 To (videoData.length - 1) If videoData(a).nodeName = "video_filename" then videoPath = videoData(a).text ElseIf videoData(a).nodeName = "video_description" then videoDescription = videoData(a).text ElseIf videoData(a).nodeName = "video_thumbnail" then videoThumbnail = videoData(a).text End If Next %> <% Next %>