[Distance]

code:

Code:

Imports System.Text.RegularExpressions Public Class Form1     Private Sub btnGrabProxies_Click(sender As Object, e As EventArgs) Handles btnGrabProxies.Click         lstProxies.Items.Clear()         Dim link = (New Net.WebClient).DownloadString("https://www.us-proxy.org/")         Dim getProxies = "<tr><td>([^>]*)</td><td>([^>]*)</td><td>([^>]*)</td><td>([^>]*)</td><td>([^>]*)</td><td>([^>]*)</td><td>([^>]*)</td><td>([^>]*)</td></tr>"         For Each item As Match In (New Regex(getProxies).Matches(link))             lstProxies.Items.Add(item.Groups(1).ToString).SubItems.AddRange({item.Groups(2).ToString, item.Groups(4).ToString, item.Groups(5).ToString, item.Groups(6).ToString, item.Groups(7).ToString, item.Groups(8).ToString})         Next     End Sub End Class

enjoy

[Killpot]

You should add the project, so lazy people like me don't have to re-create the design. Also, look into multi-threading this, it'll lock up the main thread for a while otherwise. And if you're really feeling adventurous, I suggest adding another column for ping, and if you want to go further, Pool-Thread the pinging of the IP's.

[OutOfSight]

Yeah you should of just posted the program lol

[Buildoman]

Yeah you should of just posted the program lol

Yep I agree

[hqangel]

thanks for posting this

[Skryptec]

You should actually post the whole project.

[ezioland]

thank you mate !