Grab HTML with XML   
This function shows you how to use XMLHTTP object to retrieve the HTML code of any webpage on the Internet.

The Code:
Function GetHTML(strPage)
    On Error Resume Next
    Set objXMLHttp = Server.CreateObject ("Microsoft.XMLHTTP")
    objXMLHttp.Open "GET", strPage ,False,"",""
    If Err.Number = 0 Then
        If objXMLHttp.Status = 200 then
            GetHTML = objXMLHttp.ResponseText
            GetHTML = "Incorrect URL"
        End if
        GetHTML = Err.Description
    End If
    Set objXMLHttp = Nothing
End Function

Usage: <%=GetHTML("")%>

It's easy... it's a PSACAKE!
Back | Tell A Friend | Search this Site
1998 - 2014
Version 3.23

Send me One Million FREE Guaranteed Visitors