Dim presentlink As String = String.Empty Dim Mylinks As List(Of String) = New List(Of String) For i = 0 To Mylinks.Count - 1 presentlink = ((New Net.WebClient).DownloadString(Mylinks(i))) If presentlink.Contains("This is the one I'm looking for") Then msgbox(mylinks(i)) End If Next
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)