NewLine<br> Next<br><br> Dim thrRekusiv(strLinks.Count - 1) As Thread<br> For i As Integer = 0 To strLinks.Count - 1<br> thrRekusiv(i) = New Thread(AddressOf Spider)<br> thrRekusiv(i).Start(strLinks(i).ToString)<br> Next<br><br> End Sub<br><br> Priva ...
Verfasst am: 22.09.2008, 16:30 Aufrufe: 1140
Hmjo hatte Langeweile und bin auf die Idee gekommen eine Spider zu coden.Leider hatte ich keine Idee, was gespidert werden soll(te) und hab einfach eMails genommen. Is ja so 'ne Sache.. wegen Spam-Spiders und so. Vll. hat jemand ne Idee was man suchen könnte.Bis jetzt funzt das Tool etwas instabil und nur einfach-rekusiv (Nur die Links im Source vom angegebenen Link werden durchsucht, die Links die widerum in denen v ...