asp下利用XMLHTTP 从其他页面获取数据的代码
2018-09-06 11:04
利用XMLHTTP从其他页面获取数据
我们在编写ASP代码的时候，大家都知道可以通过post或者get获得form表单的数据，那么我们如何直接获得其他页面上的数据呢？这就要借助xmlhttp协议了。xmlhttp是xmldom技术的一部分。
下面的代码就是一个很简单的例子，我们利用xmlhttp技术，把站点首页的代码以xml的形式完全获取，并且在页面中输出。
<%
DimobjXMLHTTP,xml
Setxml=Server.CreateObject(Microsoft.XMLHTTP)
xml.OpenGET,
Pullthedatafromthewebpage
xml.Send
Response.writeHeresthehtmlwenowhaveinourxmlobject
Response.write<BR><BR><BR>
Response.Write<xmp>
Response.Writexml.responseText
Response.Write</xmp>
Response.write<BR><BR><BR>
Response.writeNowhereshowthepagelooks:<BR><BR>
Response.Writexml.responseText
Setxml=Nothing
%>
下面是另一个实例
<%
dimobjHTTP,objXML,objXSL
setobjHTTP=Server.CreateObject(Microsoft.XMLHTTP)
objHTTP.openGET,
objHTTP.send
setobjXML=objHTTP.responseXML
setobjXSL=Server.CreateObject(microsoft.xmldom)
objXSL.async=false
objXSL.load(Server.MapPath(style.xsl))
if(objXSL.parseError.errorCode=0)then
Response.Write(objXML.transformnode(objXSL))
else
Response.WriteError:&objXSL.parseError.reason&URL:&objXSL.url
endif
SetobjHTTP=Nothing
SetobjXML=Nothing
SetobjXSL=Nothing
%>
style.xsl：
<xsl:stylesheetxmlns:xsl=
<xsl:templatematch=/>
<html>
<head>
<TITLE>moreover...</TITLE>
</head>
<bodyBGCOLOR=ffffff>
<DIVALIGN=center>
<TABLEBGCOLOR=ffffffBORDER=0CELLPADDING=4CELLSPACING=0WIDTH=100%>
<xsl:for-eachselect=moreovernews/article>
<TRVALIGN=middle>
<TDALIGN=leftBGCOLOR=ffffff>
<xsl:attributename=HREF>
<xsl:value-ofselect=url/>
</xsl:attribute>
<xsl:attributename=TARGET>
_blank
</xsl:attribute>
<xsl:value-ofselect=headline_text/>
<xsl:attributename=HREF>
<xsl:value-ofselect=document_url/>
</xsl:attribute>
<xsl:attributename=TARGET>
_blank
</xsl:attribute>
<xsl:value-ofselect=source/>
<xsl:attributename=HREF>
<xsl:value-ofselect=access_registration/>
</xsl:attribute>
<xsl:attributename=TARGET>
_blank
</xsl:attribute>
<xsl:value-ofselect=access_status/>
<xsl:value-ofselect=harvest_time/>GMT
</TD>
</TR>
</xsl:for-each>
</TABLE>
</DIV>
</body>
</html>
</xsl:template>
</xsl:stylesheet>
上一篇：彩色校验码的制作