My Code which used to work all along for years has recently been acting up
Dim RefPage, objXMLHTTP, HTMLPage
RefPage = Request.QueryString("ref")
if Len(RefPage) = 0 or not Left(RefPage,7) = "http://
response.write "<font face=verdana size=2>Invalid reference page - " & RefPage & "</font>"
Set objXMLHTTP = Server.CreateObject("Micro
objXMLHTTP.Open "GET", RefPage, False
HTMLPage = objXMLHTTP.responseText
Set objXMLHTTP = Nothing
What I am trying to do here is just merely grab TEXT from my own webpage and display as TEXT for Printing purposes only/
The system cannot locate the resource specified.
I have searched Google... and found very few similar comments, but hardly any solution. I also know that similar query was done here but not with the same server screenscraping issue.