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,"",""
    objXMLHttp.Send
    If Err.Number = 0 Then
        If objXMLHttp.Status = 200 then
            GetHTML = objXMLHttp.ResponseText
        Else
            GetHTML = "Incorrect URL"
        End if
    Else
        GetHTML = Err.Description
    End If
    Set objXMLHttp = Nothing
End Function
%>

Usage: <%=GetHTML("http://www.yahoo.com")%>


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

Send me One Million FREE Guaranteed Visitors