Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Getting Started Spidering a SiteThis is a very simple "getting started" example for spidering a web site. As you'll see in future examples, the Chilkat Spider library can be used to crawl the Web. For now, we'll concentrate on spidering a single site.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' The Chilkat Spider component/library is free. set spider = Server.CreateObject("Chilkat.Spider") ' The spider object crawls a single web site at a time. As you'll see ' in later examples, you can collect outbound links and use them to ' crawl the web. For now, we'll simply spider 10 pages of chilkatsoft.com spider.Initialize "www.chilkatsoft.com" ' Add the 1st URL: spider.AddUnspidered "http://www.chilkatsoft.com/" ' Begin crawling the site by calling CrawlNext repeatedly. For i = 0 To 10 success = spider.CrawlNext() If (success = 1) Then ' Show the URL of the page just spidered. Response.Write spider.LastUrl & "<br>" ' The HTML is available in the LastHtml property Else ' Did we get an error or are there no more URLs to crawl? If (spider.NumUnspidered = 0) Then Response.Write "No more URLs to spider" & "<br>" Else Response.Write spider.LastErrorText & "<br>" End If End If ' Sleep 1 second before spidering the next URL. spider.SleepMs 1000 Next %> </body> </html> |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.