string = GetWebPage( HTTPAddress
)
Example Usage:
ASP Source Code:<% Dim strPage ' get the html source of the asp emporium home page and store it ' into the variable strPage. strPage = GetWebPage( "http://www.aspemporium.com/aspemporium/index.asp" ) %>
<% Private Function GetWebPage(byVal address) Dim Fetch On Error Resume Next Set Fetch = GetObject("java:HTTPFetch") If Err Then Err.Clear GetWebPage = Null Exit Function End If On Error GoTo 0 GetWebPage = Trim( Fetch.GetURL(address) ) Set Fetch = Nothing End Function %>