Hente html fra en ekstern side

hey

de fleste servere har XMLHTTP så derfor kan du forsøge dig med:

<%
function GetHTML(url)
    Set xmlhttp = Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")
    xmlhttp.open "GET", url, false
    xmlhttp.setRequestHeader "User-Agent","My funky browser."
    xmlhttp.send()
    response.write xmlhttp.status                  ' Add this line.
    If(xmlhttp.status=404) Then
          response.write("Src not found")
    Else
          response.write Len(xmlhttp.responseText)  ' Add this line.
          GetHTML = xmlhttp.responseText
    End If
    If err.number <> 0 then
        response.write "Url not found"
    end if
    Set xmlhttp = nothing
end function

url = "http://localhost/test/test.asp"
theSrc = GetHTML(URL)
response.Write (theSrc)
%>

/hiks

Du kunne evt. også forsøge dig med AspTear componenten, som er lavet til netop dette formål. Version 1 er frit tilgængelig, mens version 1.5 er den kommercielle version, som koster lidt $:

http://www.alphasierrapapa.com/IisDev/Components/AspTear/