The following code shows how to grab a web page using the infamous ASP.
This function is used to grab an HTML page using Microsoft's XMLHTTP component , using this component you can grab any page off the internet . Here is the code for this example
<%
Function GrabPage(strURL)
Dim objXML
Set objXML = Server.CreateObject("Microsoft.XMLHTTP")
objXML.Open "GET" , strURL , False ,"",""
objXML.Send
If Err.Number = 0 Then
If objXML.Status = 200 then
GrabPage = objXML.ResponseText
Else
GrabPage = "Incorrect URL"
End if
Else
GrabPage = Err.Description
End If
Set objXML = Nothing
End Function
%>
And you call the GrabPage Function like this
<%= GrabPage("http://www.expertsforge.com")
Send Message
Advertise