Asp - Extraer todo el contenido de una pagina web
Códigos Asp
Utilizando el componente XMLHTTP obtenemos el contenido de una pagina web
Tutores.org
Mostrando Codigo - Asp
EXPLICACION
Utilizamos:
Server.CreateObject ("Microsoft.XMLHTTP"), suelen soportarlo la mayoria de los servidores asi como en nuestro localhost con iis
CODIGO
<% 'Codigo ofrecido por Tutores.org %>
- <%
- Function GetHTML(strPage)
- On Error Resume Next
- Set objXMLHttp = Server.CreateObject ("Microsoft.XMLHTTP")
- objXMLHttp.Open "GET", strPage ,False,"",""
- objXMLHttp.Send
- If Err.Number = 0 Then
- If objXMLHttp.Status = 200 then
- GetHTML = objXMLHttp.ResponseText
- Else
- ' Modificar para mensaje de pagina no encontrada
- GetHTML = "Url incorrecta"
- End if
- Else
- GetHTML = Err.Description
- End If
- Set objXMLHttp = Nothing
- End Function
- ' Modificar yahoo.com por la direccion url de la pagina que queremos obtener
- Response.Write GetHTML("http://www.yahoo.com")
- %>
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Extraer todo el contenido de una pagina web" href="http://www.tutores.org/codigo/498/" target="_blank">Extraer todo el contenido de una pagina web</a>
<!-- Final enlace Tutores.org -->
<a title="Tutores.org - Extraer todo el contenido de una pagina web" href="http://www.tutores.org/codigo/498/" target="_blank">Extraer todo el contenido de una pagina web</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS