Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

.NET 

Proxy Grabber [VB.NET]

Proxy Grabber


Hello Guys 🙂 This is my First Release on HF. This software Grab lots of proxy address with ports. You can use this software with website visiting bot.


Screenshot:
[IMG]http://img1.imagehousing.com/27/e575b0ebb51307149327b6d6285ce6c6.png[/IMG]

Virus Scan Result:
https://www.virustotal.com/en/file/3e742...399034732/


Download

Credits:


stackoverflow.com -- Some troubleshooting

iSynthesis (HF) -- GUI




Best Regards...🙂
Files seems to be clean, But as user says below this is stolen.
Give credit where credit is due.
[Image: Sig.php]
1ByqCAtGNtcgcaeuJy8Bb3KmgrYQAwSeaB

Import System.Text.RegularExpressions

Button to grab:
PHP Code

<?php 
'creating our httpwebrequest target NOTE: you can use any websites that use to provide proxies directly
      Dim the_request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://proxy-ip-list.com")
      '
creating the httpwebresponce
      Dim the_response 
As System.Net.HttpWebResponse = the_request.GetResponse
      
'defining the stream reader to read the data from the httpwebresponse
      Dim stream_reader As System.IO.StreamReader = New System.IO.StreamReader(the_response.GetResponseStream())
      '
defining a string to stream reader fisnished streaming
      Dim code 
As String = stream_reader.ReadToEnd
      
'haha here we use the regex
      Dim expression As New System.Text.RegularExpressions.Regex("[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}:[0-9]{1,4}")
      '
adding the proxies to the listbox
      Dim mtac 
As MatchCollection = expression.Matches(code)
      For 
Each itemcode As Match In mtac
      ListBox1
.Items.Add(itemcode)
      
Next 

Button to Save:
PHP Code

<?php 
If ListBox1.Items.Count = (0) Then
      MessageBox
.Show("Please click grab to grab proxies and then try saving", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
     Else
      
'defining a streamwriter
      Dim S_W As IO.StreamWriter
      '
converting listbox items to string
      Dim itms
() As String = {ListBox1.Items.ToString}
      
''defining a savefiledialog
      Dim save 
As New SaveFileDialog
      Dim it 
As Integer
      save
.FileName = "Grabbed Proxies"
      
save.Filter = "Grabbed Proxies (*.txt)|*.txt|ALL Files (*.*)|*.*"
      
save.CheckPathExists = True
      save
.ShowDialog(Me)
      
S_W = New IO.StreamWriter(save.FileName)
      For 
it = 0 To ListBox1.Items.Count - 1
      S_W
.WriteLine(ListBox1.Items.Item(it))
      
Next
      S_W
.Close()
     
End If 

Button to clear;
PHP Code

<?php 
ListBox1
.Items.Clear() 

"Credits:

stackoverflow.com -- Some troubleshooting"

You 100% leached it from here -> http://www.ultimateprogrammingtutorials...._8738.html
[Image: vjPWhyy.gif]
Sorry Guys i forget to mention it.... post updated...
(May 2, 2014 06:38 AM)DotnetDeveloper Wrote:  Sorry Guys i forget to mention it.... post updated...

Stop your bullshit dude.

Release original stuff or don't release anything.
[Image: vjPWhyy.gif]
People appreciate nothing these days.

Thanks bro, really useful.
(May 2, 2014 07:34 AM)Mon£y Wrote:  People appreciate nothing these days.

Thanks bro, really useful.

What is there to appreciate with Ctrl+C, Ctrl+V.
[Image: vjPWhyy.gif]
(May 2, 2014 08:36 AM)$lick Wrote:  What is there to appreciate with Ctrl+C, Ctrl+V.
We all started somewhere..

I found it to be a useful tool, even if it is C&P.
Got it, Thanks OP! i really like it
(May 2, 2014 06:40 AM)$lick Wrote:  Stop your bullshit dude.

Release original stuff or don't release anything.

Im afraid that is rare arround here, keep an eye out for
- Ubbylol
- TUP
- idb.
- Electrealek
- Me 😏

Coz we know how to make our stuff. period.
(May 2, 2014 03:11 PM)TheBarret Wrote:  Im afraid that is rare arround here, keep an eye out for
- Ubbylol
- TUP
- idb.
- Electrealek
- Me 😏

Coz we know how to make our stuff. period.

Lel. ident was good too. An asshole, but he knew what he was talking about.

[Image: 1zL3pDG.jpg]

(May 2, 2014 03:18 PM)SIM-1676753 Wrote:  Lel. ident was good too. An asshole, but he knew what he was talking about.

Agreed, he will return or most likely already be here under some other lurker name 😏 hes always arround ^^
Ah, a user releasing unoriginal content. He didn't even bother to slightly change it to even attempt to make it look like he made it. Not sure why people do this to be honest, I get you want to look like you know how to program but faking it doesn't help. In all honesty, if you want to learn to program I'd be happy to teach you.
(May 2, 2014 03:21 PM)Cyber Saint Wrote:  Ah, a user releasing unoriginal content. He didn't even bother to slightly change it to even attempt to make it look like he made it.

Yup, it always the same old story, it really pisses me off sometimes the nerve they have to claim it as theires.

Ive been working on a project for months, if u follow my threads u can see steps and progress i make, these idiots just copy/paste random shit everywhere.
(May 2, 2014 03:23 PM)TheBarret Wrote:  Yup, it always the same old story, it really pisses me off sometimes the nerve they have to claim it as theires.

Ive been working on a project for months, if u follow my threads u can see steps and progress i make, these idiots just copy/paste random shit everywhere.

Pisses my off as well. OK, you copied a source. Give credit you fuck .-.

[Image: 1zL3pDG.jpg]



Possibly Related Threads...
Thread / Author Replies Views Last Post
[.NET] by SMS4VERIFAug 4, 2017 07:13 PM 1 412 Aug 4, 2017 07:13 PM
Last Post: Ninja
[.NET] by Noob3Nov 20, 2016 12:47 PM 15 1,077 Nov 20, 2016 12:47 PM
Last Post: Ninja
[Python] by ExoticModzV1Mar 3, 2016 09:53 AM 14 569 Mar 3, 2016 09:53 AM
Last Post: bet4r00t