Obtenha dados de outras páginas usando XMLHTTP
Quando escrevemos o código ASP, todos sabem que podemos obter dados de formulário por meio de postagem ou obtiver. Então, como obtemos diretamente dados em outras páginas? Isso requer o uso do protocolo XMLHTTP. O XMLHTTP faz parte da tecnologia XMLDOM.
O código a seguir é um exemplo muito simples. Utilizamos a tecnologia XMLHTTP para obter completamente o código na página inicial de http://www.xxxx.com/ na forma de XML e a colocamos na página.
<%
DIMOBJXMLHTTP, XML
Setxml = server.createObject ("microsoft.xmlhttp")
xml.open "get", "http://www.codetoad.com/", false
'PULLTHEDATAFROTHTHEWEBPAGE
xml.send
Response.Write "Aqui está o tempo
Response.Write "<br> <br> <br>"
Response.Write "<xmp>"
Response.Writexml.RESPONSETEXT
Response.Write "</xmp>"
Response.Write "<br> <br> <br>"
Response.Write "Nowhere'SshowthePageLooks: <br> <br>"
Response.Writexml.RESPONSETEXT
Setxml = nada
%>
Aqui está outro exemplo
<%
DIMOBJHTTP, OBJXML, OBJXSL
setobjhttp = server.createObject ("Microsoft.xmlHttp")
objhttp.open "get", "http://p.oroverover.com/cgi-local/page?c=pop%20music%20Reviews&o=xml", false
objhttp.send
setObjxml = objhttp.Responsexml
setobjxsl = server.createObject ("Microsoft.xmldom")
objxsl.async = false
objxsl.load (server.mappath ("style.xsl")))
if (objxsl.parseerror.errorCode = 0) então
Response.write (objxml.transformNode (objxsl))
outro
Response.Write "Error:" & objxsl.parseerror.Reason & "url:" & objxsl.url
endif
Setobjhttp = nada
Setobjxml = nada
Setobjxsl = nada
%>
style.xsl:
<xsl: stylesheetxmlns: xsl = "http://www.w3.org/tr/wd-xsl">
<xsl: templatematch = "/">
<html>
<head>
<title> Além disso ... </title>
</head>
<BodbgColor = "ffffff">
<Divalign = "Center">
<Tablebgcolor = "ffffff" border = "0" CellPadding = "4" CellSpacing = "0" width = "100%">
<xsl: for-eaceleclect = "maisovernos/artigo">
<Trvalign = "meio">
<Tdalign = "esquerda" bgcolor = "ffffff">
<xsl: atributeName = "href">
<xsl: value ofleclect = "url"/>
</xsl: attribute>
<xsl: atributeName = "Target">
_em branco
</xsl: attribute>
<xsl: value ofleclec = "headline_text"/>