Read the XML file using the ASP

xiaoxiao2021-03-06  37

DIM Objhttp, Objxml, Objxsl

Set objxsl = server.createObject ("Microsoft.xmldom") objxsl.async = falseobjxsl.load (Server.MAppath ("rss.xsl")))

Set objhttp = server.createObject ("Microsoft.xmlhttp") Objhttp.Open "get", objurl, false objhttp.send

Set objxml = objhttp.responsexml objhtml = objxml.transformnode (objxsl) Objhtml = Replace (Objhtml, "" "," '")

Set objhttp = Nothing

'objhtml = server.htmlencode (Objhtml)

%>

Var rsscode;

rsScode = "<% = Objhtml%>"; rssbox.innerhtml = ""; if (rsScode == ") {rsSbox.innerhtml =" Nothing Found ";}}}}} Rssbox.innerHTML = rsScode Transfer from: http: // Goaler. Xicp.net/showlog.asp?id=481

转载请注明原文地址:https://www.9cbs.com/read-65980.html

New Post(0)