GetHtmlPageSource - Get the HTML of a page using MSXML library [ All Languages » VB »  Internet] Total Hit ( 2631) Rate this article:     Poor     Excellent   Submit Your Question/Comment about this article Rating

Click here to copy the following block ' Getting the HTML code of any page on the web ' NOTE: requires the Microsoft XML library ' Example: '  Text1.Text = GetHtmlPageSource("http://www.vb2themax.com/Default.asp") Function GetHtmlPageSource(ByVal URL As String)   Dim objHTTP As New XMLHTTP   ' add the http:// in case it isn't already present in the specified URL   If Left$(URL, 7) <> "http://" Then URL = "http://" & URL     ' open the page in sync mode   objHTTP.open "GET", URL, False   objHTTP.send   ' check the result of the operation   If objHTTP.Status = "200" Then     GetHtmlPageSource = objHTTP.responseText   End If End Function

Related Article(s)

Submitted By : Nayan Patel  (Member Since : 5/26/2004 12:23:06 PM)
	Job Description : He is the moderator of this site and currently working as an independent consultant. He works with VB.net/ASP.net, SQL Server and other MS technologies. He is MCSD.net, MCDBA and MCSE. In his free time he likes to watch funny movies and doing oil painting.
View all (893) submissions by this author  (Birth Date : 7/14/1981 )